-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathintMAllSimple.txt
1 lines (1 loc) · 235 KB
/
intMAllSimple.txt
1
{-1/16*(y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -2, 1, 3, 0]) - (I/32)*y*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -2, 1, 3, 0] + (I/32)*y*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -2, 1, 3, 0] + (I/32)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -2, 1, 3, 0] - (I/32)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -2, 1, 3, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0])/8 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0])/4 + (I/2)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (I/2)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] + (I/4)*dot[a[1], a[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (I/2)*dot[a[1], v[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (I/4)*dot[a[1], a[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] + (I/2)*dot[a[1], v[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0] - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/8 - (y*dot[a[1], a[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/8 + (y*dot[a[1], a[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/8 + (dot[a[1], a[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/8 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/8 + (I/16)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/16)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/16)*y*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/2 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/4 - (I/4)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/4)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/4)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/4)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/4)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/4)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/8)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/8)*y*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/8)*y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/8)*y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0])/2 + (I/2)*y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/2)*y*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (I/2)*y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] + (I/2)*y*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, -1])/8 - (I/16)*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, -1] + (I/16)*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, -1] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, -1, 1, 2, 0])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, -1, 1, 2, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, -1, 1, 2, 0])/4 - (y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0])/8 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0])/8 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0])/8 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0])/8 + (I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0] + (I/8)*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0] + (y^2*dot[a[1], a[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (y*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (y^2*dot[a[1], a[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (dot[a[1], v[2]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (dot[a[1], a[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (y*dot[a[1], a[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (I/16)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/8)*y*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*y*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/8)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/16)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0])/8 + (I/16)*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/8)*y^2*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/16)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/16)*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/8)*y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] + (I/16)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (I/8)*y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1])/8 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1])/8 + (I/16)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1] - (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1] - (I/16)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1] + (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, -1] + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, -1, 1, 3, 0])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, -1, 1, 3, 0])/4 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 3, 0])/4 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 3, 0])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0])/4 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0])/8 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0])/8 + (I/16)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/16)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] + (I/8)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/8)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] + (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] + (I/16)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/16)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/16)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] + (I/16)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] + (I/16)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (I/16)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0] - (dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1])/4 - (dot[a[1], a[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1])/4 + (dot[a[1], a[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1])/4 + (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1])/2 + (I/2)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - (I/2)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - (I/2)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + (I/2)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + (I/4)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - (I/4)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + (I/4)*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - (I/4)*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - I*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + I*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] + I*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - I*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 0, 0])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0])/2 + (dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0])/4 + (I/4)*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0] + (I/4)*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0] - (dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[1], v[2]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 - (dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 + (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 - (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 + (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[1], a[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 - (dot[a[1], a[2]]*dot[a[1], k[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 + (dot[a[1], a[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (dot[a[1], a[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[v[1], F[2], v[2]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 + (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0])/4 - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - I*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + I*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/4)*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/4)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/8)*dot[a[1], a[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], v[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/8)*dot[a[1], a[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/4)*dot[a[1], v[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/4)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/4)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], q[1]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (I/2)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + I*dot[a[1], k[2]]*dot[a[1], v[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + (I/2)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - I*dot[a[1], k[2]]*dot[a[1], v[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - I*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] + I*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0] - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, -1])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, -1])/4 - (y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 + (y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 + (y*dot[a[1], a[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 - (dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 - (y*dot[a[1], a[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 + (dot[a[1], a[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 - (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/8)*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + 2*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]^2*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/2 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/2 + (I/2)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/2)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/4)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (I/4)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (I/2)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (I/2)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (I/4)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/4)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1])/4 - (I/4)*y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/4)*y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (I/4)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + I*y*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - (2*I)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + I*y*dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - I*y*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (2*I)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] - I*y*dot[a[1], q[1]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]^2*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1] + (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*dot[v[1], F[2], S[1], v[2]]*G[1, q[1]]*j[gr1, 0, 1, 1, 0] + y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 1, 0] + (3*y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 + y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/2 + (y*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/2 - (y*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 + (y*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (dot[a[1], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 + (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0])/4 - (I/4)*y*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] + (I/4)*y*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] + (I/4)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] - (I/4)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] - (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] + (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] - (I/4)*y*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0] + (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], a[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (dot[a[1], v[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (y*dot[a[1], k[2]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (3*y*dot[a[1], a[2]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], a[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*dot[a[1], a[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (dot[a[1], k[2]]^2*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (3*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (I/8)*y*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/8)*y*dot[a[1], a[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/8)*y*dot[a[1], a[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - ((3*I)/8)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/8)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + ((3*I)/8)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/8)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - ((3*I)/8)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/8)*y*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^3*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + 2*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/4)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/4)*y*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*dot[a[1], k[2]]^3*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*dot[a[1], k[2]]^3*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + I*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]^3*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/8 - (I/4)*y*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/4)*y*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/2)*y*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + ((3*I)/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (I/4)*y*dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/2)*y*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - ((3*I)/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (I/4)*y*dot[a[1], q[1]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0])/2 - I*y*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + I*y*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + I*y*dot[a[1], k[2]]^3*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (2*I)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + I*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*y*dot[a[1], k[2]]^3*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] + (2*I)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - I*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -2])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -2])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, -1])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, -1])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, -1])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1])/4 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1])/4 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1])/4 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1])/4 + (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1] - (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1] + (I/4)*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1] - (y*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/2 - (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/2 + (dot[a[1], a[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 - (y*dot[a[1], a[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + (dot[a[1], a[2]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 - (dot[a[1], a[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 - (3*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1])/4 + (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] + (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (I/8)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] + (I/8)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] + ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] + (I/8)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1] - (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], S[1], v[2]]*G[1, q[1]]*j[gr1, 0, 1, 2, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 2, 0])/2 + (y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (3*y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/2 - (y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/2 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (3*y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 + (y*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0])/4 - (I/2)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] + (I/2)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] + (I/2)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] - (I/2)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] + (I/4)*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0] - (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 + (dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 - (y^2*dot[a[1], k[2]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 + (y^2*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 - (y^2*dot[a[1], a[2]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (y^2*dot[a[1], a[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], v[2]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (y*dot[a[1], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 + (y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]^2*dot[q[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (3*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^3*dot[v[1], F[2], v[2]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/2 + (3*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[v[1], F[2], v[2]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/8)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/4)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/8)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/2)*dot[a[1], k[2]]^3*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - ((3*I)/4)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0])/4 - (I/8)*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*y^2*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/4)*y^2*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/8)*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/4)*y^2*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] - (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (I/4)*y^2*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0] + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, -1])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, -1])/2 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, -1])/2 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, -1])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, -1])/2 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, -1])/2 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1])/4 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1])/4 - (I/8)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1] + (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1] + (I/8)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1] - (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, -1] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, 0])/2 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, 0])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 0, 1, 3, 0])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, 0])/2 + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, 0])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 3, 0])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^3*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0])/4 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0])/4 - (I/8)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (I/8)*y*dot[a[1], k[2]]^2*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*y*dot[a[1], k[2]]^2*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (I/8)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (I/8)*dot[a[1], k[2]]^3*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*dot[a[1], k[2]]^3*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (I/8)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (I/8)*y*dot[a[1], k[2]]^3*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] + (I/8)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0] - (y^2*dot[a[2], a[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 + (dot[a[2], v[1]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 + (y^2*dot[a[1], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (y*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (y*dot[a[1], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 + (dot[a[1], v[2]]*dot[a[2], v[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 + (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1])/16 - (I/32)*y*dot[a[2], F[2], v[1]]^2*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] + (I/32)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] + (I/16)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] - (I/16)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] - (I/32)*y*dot[a[2], a[2]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] + (I/32)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -2, 2, 1] + (y*Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -2, 2, 2])/8 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -2, 2, 2])/8 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -2, 2, 2])/8 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -2, 2, 2])/8 - (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -2, 2, 2])/8 - (y*dot[a[2], a[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/4 + (y*dot[a[1], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/4 - (dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/8 - (dot[a[1], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/8 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0])/8 - (I/16)*dot[a[2], F[2], v[1]]^2*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0] - (I/8)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0] - (I/16)*dot[a[2], a[2]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0] + (Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 1])/4 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 1])/2 + (Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 1])/2 + (dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/4 - (y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 + (y*dot[a[1], v[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 - (dot[a[1], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 - (y*dot[a[1], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 + (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1])/8 + (I/16)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1] + (I/8)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1] + (I/16)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1] + (y*Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 2])/4 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 2])/4 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 1, 2])/4 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 2])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 2])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2])/2 + (I/2)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2] + (I/8)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2] + (I/4)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2] - (I/2)*dot[a[1], q[1]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2] - (y*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/8 + (dot[a[2], v[1]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/8 - (I/16)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/2 - (I/4)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/4)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/2)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/8)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/16)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (I/8)*dot[a[1], q[1]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1])/2 + (I/2)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] + (I/4)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (I/2)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1] - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 0])/8 + (3*y*Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 0])/8 - (y*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 0])/8 + (dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 0])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0])/8 - (I/8)*y*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0] + (I/8)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0] - (I/8)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0] + (y^2*dot[a[2], a[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (dot[a[2], v[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (y^2*dot[a[1], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 + (y*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (y*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 + (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/4 + (y*dot[a[1], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/4 - (dot[a[1], v[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/4 + (dot[a[1], k[2]]*dot[a[2], v[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/4 - (I/16)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/8)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/8)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/16)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/16)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/16)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/2 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/8 + (I/16)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/8)*y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] + (I/16)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (I/8)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0])/2 + (I/2)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0] - (y*Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/4 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/4 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/4 + (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/2 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/2 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 1])/4 - (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*dot[v[1], F[2], S[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1] - (dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1])/8 + (y^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1])/8 + (y^2*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1])/8 - (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1])/8 + (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, -1, 2, 1])/8 - (y*Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1])/8 + (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1])/2 + (I/8)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1] - (I/4)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1] - (I/8)*y*dot[a[2], k[2]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1] - (I/8)*y*dot[a[2], a[2]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 1] - (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (y^2*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/4 + (y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/4 - (y^2*dot[a[1], k[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (y^2*dot[a[1], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (dot[a[1], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (I/16)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (I/8)*y*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (I/8)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (I/16)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (I/16)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]^2*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1])/8 + (I/16)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (I/8)*y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1] - (Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]^2*j[gr1, 1, -1, 2, 2])/8 + (y^2*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]^2*j[gr1, 1, -1, 2, 2])/4 - (I/4)*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*j[gr1, 1, -1, 2, 2] + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 2])/4 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, -1, 2, 2])/4 + (I/4)*y*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[2, -q[1]]*j[gr1, 1, -1, 2, 2] - (Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 2])/8 + (y^2*Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 2])/4 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 2])/4 - (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 2])/4 - (dot[a[2], a[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, -1])/4 + (dot[a[1], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, -1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1])/4 - (Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 0, 0])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 0])/2 - (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0])/4 + (dot[a[1], v[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0])/4 - (dot[a[1], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0])/4 + (Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 0, 1])/2 - (Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 0, 1])/2 + (Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 0, 1])/2 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 1])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 1])/2 + (dot[a[2], q[1]]^2*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 1])/4 - (dot[a[1], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 1])/4 + (dot[a[1], v[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 1])/4 - (dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2])/4 - (I/8)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] + Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2])/2 + (I/2)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] - (I/4)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] + (I/4)*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] - I*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2] - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, -1])/2 + (3*Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, -1])/4 - (dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, -1])/4 - (I/4)*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1] + (I/4)*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1] - (y*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (y*dot[a[2], a[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 - (y*dot[a[1], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (dot[a[1], v[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/2 - (dot[a[1], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/2 + (dot[a[1], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 + (I/8)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/4)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/8)*dot[a[2], a[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/8)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/4)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/2 + Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/2 + (I/2)*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - (I/4)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/2)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - (I/4)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1])/4 - (I/4)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + (I/4)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - (I/4)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] + I*y*dot[a[1], q[1]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - I*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1] - (Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0])/4 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0])/4 - y*Cosh[dot[a[2], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0] - (y*Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0])/4 + y*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0] - (3*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0])/4 + (Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0])/2 - (I/2)*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*dot[v[1], F[2], S[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 0] + (y*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 0])/4 + (y*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 0])/2 + (y*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 0])/4 - (Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0])/2 + y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], a[2]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] + (I/4)*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0] - (I/2)*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/2 + (y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (y*dot[a[1], v[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (dot[a[1], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + (y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/2 - (y*dot[a[1], k[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (y*dot[a[1], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (y*dot[a[1], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (3*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (I/4)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/8)*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/8)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/8)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/8)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/8)*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/2 + (I/2)*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0])/4 - (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + (I/4)*y*dot[a[1], q[1]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - (I/4)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] - Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + I*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0] + y*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]^2*j[gr1, 1, 0, 1, 1] - (I/2)*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*j[gr1, 1, 0, 1, 1] - (y*Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 + (Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1])/2 - (I/2)*y*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 1] - (y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 1])/4 - (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 1])/4 + (y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 1])/2 + (I/2)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]^2*G[2, -q[1]]*j[gr1, 1, 0, 1, 1] + (y*Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1])/2 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1])/2 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1])/2 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1])/2 - y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1] + (I/4)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1] - (I/4)*dot[a[2], a[2]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1] + (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1] + (y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 + (dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 - (y*dot[a[1], k[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1] + (I/4)*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]^2*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1])/4 + (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1] + (dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, -2])/4 - (dot[a[1], q[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2])/4 - (dot[a[2], v[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2])/4 - (I/8)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2])/4 + Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (I/2)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + I*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] - (I/4)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (I/2)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (I/4)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] - (I/8)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (I/4)*dot[a[1], q[1]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] - (I/2)*dot[a[1], q[1]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] + (I/2)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] - I*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2] - (3*y*Cosh[dot[a[2], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, -1])/4 + (y*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, -1])/4 + (dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, -1])/4 - (dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, -1])/2 + (Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, -1])/4 + (I/4)*y*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, -1] - (I/4)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, -1] - (I/4)*y*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, -1] + (I/4)*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (y*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/2 - (y*dot[a[1], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 + (dot[a[1], v[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (dot[a[1], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (I/8)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/8)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/8)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/4)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 + Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/2)*y*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]^2*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/4)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/2)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/2)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + I*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/4)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/2)*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/8 + (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/4)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/2)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/8)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/4)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]^2*dot[k[2], S[2], q[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/2 - Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1])/2 + I*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - I*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] + (I/2)*dot[a[1], q[1]]*dot[a[2], a[2]]*dot[a[2], k[2]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - I*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1] - (I/2)*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 0, 2, 0] + (y^2*Cosh[dot[a[2], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/4 + (y^2*Cosh[dot[a[2], q[1]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/2 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/2 + (y*Cosh[dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/2 - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 0])/4 + (I/4)*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0] + (I/2)*y*Cosh[dot[a[1], q[1]]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], S[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0] + (dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/4 + (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/2 - (y*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/4 - (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0])/2 - (I/4)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + y*Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + (Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0])/2 + (I/2)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + (I/4)*y*dot[a[2], k[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + (I/4)*y*dot[a[2], a[2]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0] + (I/2)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/4)*Cosh[dot[a[1], q[1]]]*dot[a[2], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (y^2*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 - (y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 + (y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 + (y^2*dot[a[1], k[2]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*dot[a[1], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 + (y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (dot[a[1], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 + (y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 + (y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 - (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/8)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/4)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/8)*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]^2*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 - (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/2)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/4)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/2)*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/2)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/8 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/8 + (I/8)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/4)*y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/4)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (I/4)*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 - Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0])/2 + I*y*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] - (I/2)*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0] + (Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*j[gr1, 1, 0, 2, 1])/2 - y^2*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*j[gr1, 1, 0, 2, 1] + I*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 0, 2, 1] + (I/2)*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*j[gr1, 1, 0, 2, 1] - (y*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 1])/2 - (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 1])/2 + (y^2*Cosh[dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*j[gr1, 1, 0, 2, 1])/2 + (I/2)*y*Cosh[dot[a[1], q[1]]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 1] - (I/4)*Cosh[dot[a[1], q[1]]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 1] + (y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 1])/4 - (dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 1])/4 + (y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 1])/4 - I*y*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] + (I/4)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] + (Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1])/2 - y^2*Cosh[dot[a[2], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1])/4 + y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] + (I/4)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] - (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] - (I/2)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 1] - (I/2)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] - (y^2*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/4 + (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/4 - (y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/2 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/4 - (I/8)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] - (I/8)*y*dot[a[2], k[2]]^2*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] + (I/8)*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] - (I/8)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], S[2], q[1]]*dot[v[1], F[2], v[2]]^2*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1])/8 + (I/8)*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] - (I/4)*y^2*dot[a[1], q[1]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1] - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -2])/2 - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -2])/2 + (dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -2])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 - (dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 + (dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 + (dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, -1])/2 + (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 - (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 - (dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 + (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 + (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 - (dot[a[1], q[1]]^2*dot[a[2], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1])/2 + Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]^2*j[gr1, 1, 1, 0, 0] - Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 0, 0] + Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 0, 0] - I*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0] + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 + (dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 + (dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 + (Cosh[dot[a[1], k[2]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 - (Cosh[dot[a[1], k[2]]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0])/2 + Cosh[dot[a[1], k[2]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0] - Cosh[dot[a[1], k[2]]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0] + I*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0] - I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0] + (dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[1], k[2]]*dot[a[2], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 + (3*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 - dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0] + (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 - (dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -2])/2 - (dot[a[1], k[2]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -2])/2 + (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -2])/2 - I*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 1, -1] + (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 - (y*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 - (dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 + (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, -1])/2 + (y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 - (y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 - (y*dot[a[1], k[2]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 + (y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 + (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 - (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 + (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 - (dot[a[1], q[1]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1])/2 - 2*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*j[gr1, 1, 1, 1, 0] + I*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 1, 1, 0] + I*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]^2*G[1, q[1]]*j[gr1, 1, 1, 1, 0] - (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 1, 0] - I*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0] + I*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0] + (I/2)*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0] + 2*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0] - 2*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0] + I*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - I*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + I*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 + y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - (y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 - (dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 + (dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 + (y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 + (y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0])/2 - y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - y*Cosh[dot[a[1], k[2]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + y*Cosh[dot[a[1], k[2]]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - y*Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + y*Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + y*Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - y*Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - I*dot[a[1], k[2]]^2*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + I*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - I*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - I*y*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] + I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0] - I*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] + I*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] + (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] - (3*y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0])/2 + (y*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0])/2 + y*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] - (3*y*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0])/2 + y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] + (y*dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0])/2 + y*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] - y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0] + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -2])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -2])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -2])/2 + (dot[a[1], k[2]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -2])/2 - dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -2] + (dot[a[1], q[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -2])/2 + (dot[a[1], a[2]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -2])/2 - (dot[a[1], a[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -2])/2 + I*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 2, -1] - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 - (y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 + (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 - (Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 + (dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 - (dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 + (y*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 - (y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, -1])/2 - (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 + (dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 - (y*dot[a[1], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 + (y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 + (dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 - dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1] + (dot[a[1], q[1]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, -1])/2 - (Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]^2*j[gr1, 1, 1, 2, 0])/2 + y^2*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]^2*j[gr1, 1, 1, 2, 0] - I*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*j[gr1, 1, 1, 2, 0] - I*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 1, 2, 0] + I*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0] - I*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0])/2 - y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0])/2 + y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 2, 0] - I*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + I*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + (y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 + (dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 - y^2*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] - (dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 + (y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 + (y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 - (Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 + y^2*Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + (Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 - y^2*Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + (Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 - y^2*Cosh[dot[a[1], k[2]]]*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] - (Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0])/2 + y^2*Cosh[dot[a[1], k[2]]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + I*y*dot[a[1], k[2]]^2*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] - I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]^2*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] - I*y*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + I*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 2, 0] + I*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[k[2], S[1], v[2]]*dot[q[1], F[2], v[1]]^2*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0] - I*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]^2*dot[q[1], S[1], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0] - (dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 + (3*y^2*dot[a[1], k[2]]^2*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 + (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 - (3*y^2*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 + (dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 - y^2*dot[a[1], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0] - (dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0])/2 + y^2*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]^2*G[2, k[2] - q[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 2, 0] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0]*tr[F[2], S[1]])/8 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0]*tr[F[2], S[1]])/4 + (I/4)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0]*tr[F[2], S[1]] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]])/16 - (I/32)*y*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/32)*y*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/32)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (I/32)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]])/4 - (I/8)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[1]] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]])/32 + (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]])/16 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]])/32 - (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]])/16 - (I/16)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[1]] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]])/8 - (I/16)*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] + (I/16)*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]])/2 + (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] - (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], k[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] + (I/4)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[a[1], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[1]] - (I/8)*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/8)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/8 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/16 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]^2*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/8 + (I/16)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], v[2]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], v[2]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], k[2]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/16)*dot[a[1], q[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/16)*dot[a[1], q[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/16)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/4 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], v[2]]^2*dot[q[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/2 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/2 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]])/2 - (I/4)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/2)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/2)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]^2*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], k[2]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]^2*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], q[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], S[2], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], S[2], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]] + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]])/8 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]])/8 - (I/16)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] + (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] + (I/16)*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (I/16)*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]])/2 + y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]])/2 + (I/4)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] + (I/4)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (I/4)*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, -1]*tr[F[2], S[1]] - (I/4)*y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*y*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/16 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/8 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/4 - (3*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/8 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]^2*dot[v[1], F[2], v[2]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/8 - (I/16)*y*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[1], q[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[1], q[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/16)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/16)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], k[2]]^2*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + ((3*I)/16)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/16)*dot[a[1], q[1]]^2*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]^2*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - ((3*I)/16)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/16)*dot[a[1], q[1]]^2*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], k[2]]^2*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + ((3*I)/16)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[1], q[1]]^2*dot[q[1], S[2], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/4 + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/4 + (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/2 - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^3*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/2 + y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[v[1], F[2], v[2]]*e[1]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]])/2 + (I/4)*y*dot[a[1], k[2]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/2)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], q[1]]^2*dot[a[1], F[2], v[1]]*dot[k[2], S[2], q[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], k[2]]^2*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], k[2]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*y*dot[a[1], k[2]]^2*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], S[2], q[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]^3*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/2)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[k[2], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]^3*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/2)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[q[1], S[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], k[2]]^3*dot[q[1], S[2], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/2)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[q[1], S[2], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[q[1], S[2], F[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]] - (I/8)*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/4)*y^2*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/4)*y^2*dot[a[1], k[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/4)*y^2*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/8)*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/4)*y^2*dot[a[1], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/8)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/4)*y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]])/16 - (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]])/8 - (Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]])/16 + (y^2*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]])/8 + (I/8)*y*dot[a[1], k[2]]^2*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], S[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] - (I/8)*y*dot[a[1], k[2]]^2*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[1]] + (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -2]*tr[F[2], S[1]] - (I/32)*y*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[1]] + (I/32)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[1]] - (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[1]] + (I/16)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[1]] - (I/32)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[1]] - (I/32)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[1]] + (I/32)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[1]] + (I/32)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[1]] - (I/32)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[1]] + (I/32)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[1]] - (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -2]*tr[F[2], S[1]] + (I/32)*y*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1]*tr[F[2], S[1]] - (I/32)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, -1]*tr[F[2], S[1]] + (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1]*tr[F[2], S[1]] - (I/16)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, -1]*tr[F[2], S[1]] + (I/16)*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] + (I/32)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] + (I/32)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] - (I/32)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] - (I/32)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 2, 0]*tr[F[2], S[1]] + (I/32)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1]*tr[F[2], S[1]] - (I/32)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 2, 1]*tr[F[2], S[1]] - (I/16)*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -2]*tr[F[2], S[1]] + (I/16)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[1]] + (I/8)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[1]] - (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[1]] - (I/16)*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[1]] + (I/16)*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[1]] + (I/8)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -2]*tr[F[2], S[1]] + (I/16)*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -2]*tr[F[2], S[1]] - (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -2]*tr[F[2], S[1]] + (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -2]*tr[F[2], S[1]] - (I/8)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] + (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/8)*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/8)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/16)*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/8)*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] + (I/4)*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]] - (I/4)*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] + (I/8)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] + (I/16)*dot[a[2], q[1]]^2*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] - (I/16)*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] - (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] - (I/4)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]] - (I/16)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[1]] - (I/16)*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[1]] + (I/16)*dot[a[2], a[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -2]*tr[F[2], S[1]] - (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -2]*tr[F[2], S[1]] + (I/8)*y*dot[a[2], a[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[1]] + (I/8)*y*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[1]] + (I/16)*y*dot[a[2], a[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[1]] + (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[1]] - (I/4)*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[1]] + (I/4)*y*Cosh[dot[a[2], k[2]]]*Cosh[dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] + (I/8)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] - (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] + (I/16)*dot[a[2], k[2]]^2*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] + (I/4)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpe[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[1]] + (I/16)*y*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpe[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 1]*tr[F[2], S[1]] - (I/2)*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*j[gr1, 1, 1, 0, -1]*tr[F[2], S[1]] - (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1]*tr[F[2], S[1]] + (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, -1]*tr[F[2], S[1]] - (I/4)*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[1]] - (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[1]] + (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[1]] + (I/2)*y*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*j[gr1, 1, 1, 1, -1]*tr[F[2], S[1]] + (I/2)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*j[gr1, 1, 1, 1, -1]*tr[F[2], S[1]] + (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1]*tr[F[2], S[1]] - (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, -1]*tr[F[2], S[1]] + (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[1]] - (I/4)*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, -k[2] + q[1], k[2]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[1]] - (I/2)*y*Cosh[dot[a[2], k[2]] - dot[a[2], q[1]]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*j[gr1, 1, 1, 2, -1]*tr[F[2], S[1]] + (I/16)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 0, 0]*tr[F[2], S[2]] - (I/32)*y*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[2]] - (I/16)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[2]] + (I/16)*y*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 1, 0]*tr[F[2], S[2]] - (I/16)*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[2]] - (I/16)*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[2]] - (I/16)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[2]] + (I/32)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 2, 0]*tr[F[2], S[2]] - (I/32)*y*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0]*tr[F[2], S[2]] + (I/32)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, -1, 1, 3, 0]*tr[F[2], S[2]] - (I/16)*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, -1]*tr[F[2], S[2]] - (I/8)*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] + (I/16)*dot[a[1], a[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] - (I/4)*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] + (I/8)*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] + (I/4)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] - (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[2]] + (I/8)*y*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] + ((3*I)/16)*y*dot[a[1], a[1]]*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] - (I/16)*y*dot[a[1], a[1]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] - (I/4)*y*dot[a[1], k[2]]^3*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] + (I/2)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] - (I/4)*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], k[2]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] + (I/8)*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] - (I/8)*dot[a[1], a[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] - ((3*I)/16)*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] + (I/4)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] - (I/16)*dot[a[1], q[1]]^2*dot[k[2], v[1]]*dot[a[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, -1]*tr[F[2], S[2]] + (I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] + (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] + ((3*I)/16)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] - (I/4)*dot[a[1], k[2]]^3*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] + ((3*I)/8)*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 2, 0]*tr[F[2], S[2]] + (I/16)*y*dot[a[1], k[2]]^3*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0]*tr[F[2], S[2]] - (I/16)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*Gpe[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 3, 0]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[2]])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[2]])/4 + (I/4)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, -1]*tr[F[2], S[2]] + (I/16)*dot[a[1], v[2]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]])/32 + (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]])/16 - (I/32)*y*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] + (I/32)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] + (I/16)*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]])/4 - (I/8)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] + (I/8)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, -1, 1, 0]*tr[F[2], S[2]] + (I/16)*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] - (I/8)*y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] + (I/8)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]])/32 + (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]])/16 - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]])/16 - (I/16)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] - (I/32)*y*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] + (I/32)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, -1, 1, 1]*tr[F[2], S[2]] - (I/16)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*j[gr1, 1, -1, 1, 2]*tr[F[2], S[2]] + (I/8)*y^2*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*j[gr1, 1, -1, 1, 2]*tr[F[2], S[2]] - (I/16)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 2]*tr[F[2], S[2]] + (I/8)*y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, -1, 1, 2]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[2]])/8 - (I/16)*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[2]] + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[2]])/2 + (I/4)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[a[2], S[1], q[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[2]] - (I/8)*y*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] + (I/8)*y*dot[a[1], a[2]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], v[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] - (I/4)*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] + (I/4)*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]])/8 - (I/16)*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] + (I/16)*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]])/2 + (I/4)*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[q[1], S[1], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[2]] + (I/2)*y*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]] - (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]] + (I/8)*y*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]] + (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]])/8 + (I/16)*dot[a[2], q[1]]^2*dot[q[1], S[1], v[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 1]*tr[F[2], S[2]] + (I/8)*dot[a[1], q[1]]*dot[a[2], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/16 + (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/8 - (I/16)*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] - (I/8)*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] - (I/16)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] - (I/16)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/4 - (Cosh[dot[a[1], q[1]]]*dot[a[2], a[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]^2*dot[q[1], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]])/2 + (I/4)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] + (I/2)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] + (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], S[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[2]] - (I/8)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/4)*Cosh[dot[a[1], q[1]]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/8)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[v[1], F[2], v[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/8)*dot[a[1], v[2]]*dot[a[2], k[2]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/8)*dot[a[1], v[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/4)*y*dot[a[1], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/8)*dot[a[1], q[1]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/8)*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/8)*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/8 + (y*Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/8 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/16 + (I/16)*y*dot[a[2], q[1]]*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/16)*y*dot[a[2], k[2]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/16)*y*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/16)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/16)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/16)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/16)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/16)*y*dot[a[2], q[1]]^2*dot[q[1], S[1], F[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (y*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/2 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/4 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]])/4 - (I/4)*y*dot[a[2], q[1]]^2*dot[a[2], F[2], v[1]]*dot[k[2], S[1], q[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], S[1], q[1]]*dot[q[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/4)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] - (I/4)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[q[1], S[1], F[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[2]] + (I/8)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] - (I/4)*y^2*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], q[1]]]*dot[q[1], F[2], v[1]]*G[2, k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] + (I/4)*y*Cosh[dot[a[1], q[1]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] + (I/8)*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] - (I/4)*y^2*dot[a[1], q[1]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*G[1, q[1]]*G[2, k[2]]*G[2, -q[1]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]])/16 + (y^2*Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]])/8 - (I/8)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[q[1], F[2], v[1]]*dot[q[1], S[1], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] - (I/16)*y*dot[a[2], q[1]]^2*dot[k[2], S[1], q[1]]*dot[v[1], F[2], v[2]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 1]*tr[F[2], S[2]] - (I/8)*Cosh[dot[a[1], q[1]]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*G[2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[2]])/16 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[a[2], F[2], v[1]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, -1]*tr[F[2], S[2]])/4 - (I/8)*Cosh[dot[a[1], q[1]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[2]] + (I/8)*Cosh[dot[a[1], q[1]]]*Cosh[dot[a[2], k[2]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, -q[1]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[2]] - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[2]])/16 - (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[2]])/16 + (Cosh[dot[a[1], q[1]]]*dot[a[2], k[2]]^2*dot[a[2], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*e[1]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 2, 0]*tr[F[2], S[2]])/4 + (I/2)*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[2]] - (I/2)*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[2]] + (I/2)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[v[1], F[2], v[2]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 0, 0]*tr[F[2], S[2]] - (I/2)*y*Cosh[dot[a[1], k[2]]]*Cosh[dot[a[1], k[2]] - dot[a[1], q[1]]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[2]] + (I/2)*y*dot[a[1], k[2]]^2*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[2]] - (I/2)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*dot[q[1], F[2], v[1]]*G[1, k[2]]*G[1, -k[2] + q[1]]*G[2, k[2] - q[1]]*j[gr1, 1, 1, 1, 0]*tr[F[2], S[2]] - (I/16)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[k[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/8)*dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[k[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/8)*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[a[1], v[2]]*dot[k[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/16)*y*dot[a[1], k[2]]^2*dot[k[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - ((3*I)/32)*y*dot[a[1], k[2]]*dot[a[1], q[1]]*dot[k[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*y*dot[a[1], q[1]]^2*dot[k[2], v[1]]*G[2, k[2] - q[1]]*Gpo[1, 1, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/8)*y*dot[a[1], k[2]]^3*dot[k[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/4)*y*dot[a[1], k[2]]^2*dot[a[1], q[1]]*dot[k[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/8)*y*dot[a[1], k[2]]*dot[a[1], q[1]]^2*dot[k[2], v[1]]*e[1]*G[2, k[2] - q[1]]*Gpo[1, 2, -k[2] + q[1], k[2]]*j[gr1, 0, 1, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/32)*dot[a[2], k[2]]*dot[a[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/32)*dot[a[2], q[1]]*dot[a[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*y*dot[a[2], q[1]]^2*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/8)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 0, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*dot[a[2], k[2]]*dot[a[2], v[1]]*dot[k[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/32)*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/8)*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[a[2], v[1]]*dot[k[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, -1]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/32)*y*dot[a[2], k[2]]*dot[a[2], q[1]]*dot[k[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] - (I/32)*y*dot[a[2], q[1]]^2*dot[k[2], v[1]]*G[1, q[1]]*Gpo[2, 1, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]] + (I/8)*y*dot[a[2], k[2]]*dot[a[2], q[1]]^2*dot[k[2], v[1]]*e[1]*G[1, q[1]]*Gpo[2, 2, -q[1], k[2]]*j[gr1, 1, 0, 1, 0]*tr[F[2], S[1]]*tr[F[2], S[2]], {dot[q[1], q[1]], dot[k[2], k[2]] - 2*dot[k[2], q[1]] + dot[q[1], q[1]], dot[k[2], v[1]], dot[k[2], v[2]]}}