0=(∑_i^( )) (ci-(Subscript[p, i])(e^(j θ)))(OverBar[(Subscript[p, i])])(e^(-j θ))(-j)+(OverBar[(ci-(Subscript[p, i])(e^(j θ)))])(Subscript[p, i])(e^(j θ))j=j(∑_i^( )) (-(Subscript[c, i])+(Subscript[p, i])(e^(j θ)))(OverBar[(Subscript[p, i])])(e^(-j θ))+(OverBar[(ci-(Subscript[p, i])(e^(j θ)))])(Subscript[p, i])(e^(j θ))