∇J=2((\[LeftBracketingBar](Subscript[y, n])\[RightBracketingBar]-R)/(\[LeftBracketingBar](Subscript[y, n])\[RightBracketingBar]))[(Re[(OverBar[(Subscript[y, n])])   (e^(j (Subscript[θ, n]^t)))∘((OverBar[(Subscript[G, 1,n]^s)])(Subscript[X, 1,n])+(OverBar[(Subscript[G, 2,n]^s)])(Subscript[X, 2,n]))]-Im[(OverBar[(Subscript[y, n])])  (Subscript[A, n]^t) ∘ (e^(j (Subscript[θ, n]^t)))∘((OverBar[(Subscript[G, 1,n]^s)])(Subscript[X, 1,n])+(OverBar[(Subscript[G, 2,n]^s)])(Subscript[X, 2,n]))]Re[(OverBar[(Subscript[y, n])])   (((e^(j (Subscript[φ, 1,n])))((OverBar[(Subscript[W, n]^t)])))^T)(Subscript[X, 1,n])]-Im[(OverBar[(Subscript[y, n])])   (Subscript[b, 1,n])   (((e^(j (Subscript[φ, 1,n])))((OverBar[(Subscript[W, n]^t)])))^T)(Subscript[X, 1,n])]Re[(OverBar[(Subscript[y, n])])   (((e^(j (Subscript[φ, 2,n])))((OverBar[(Subscript[W, n]^t)])))^T)(Subscript[X, 2,n])]-Im[(OverBar[(Subscript[y, n])])   (Subscript[b, 2,n])   (((e^(j (Subscript[φ, 2,n])))((OverBar[(Subscript[W, n]^t)])))^T)(Subscript[X, 2,n])])]with:(Subscript[W, n]^t)=(Subscript[A, n]^t) ∘ (e^(-j (Subscript[θ, n]^t))),   with:(Subscript[A, n]^t)=(([(Subscript[a, 0,n])   (Subscript[a, 1,n])   (Subscript[a, 2,n])   . . .   (Subscript[a, K-1,n])])^T)(Subscript[θ, n]^t)=(([(e^(-j (Subscript[θ, 0,n])))   (e^(-j (Subscript[θ, 1,n])))   (e^(-j (Subscript[θ, 2,n])))   . . .    (e^(-j (Subscript[θ, K-1,n])))])^T),
and:(Subscript[G, 1,n]^s)=(Subscript[b, 1,n])(e^(-j (Subscript[φ, 1,n])))(Subscript[G, 2,n]^s)=(Subscript[b, 2,n])(e^(-j (Subscript[φ, 2,n])))