Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Clear[r];
- Clear[z0];
- contour = z0 + r Exp[I theta];
- f = (z - 3)^2*(z^3 + 1);
- integrand = ((D[f, z] / f ) /. z -> contour)*D[contour, theta];
- indefintegral = Integrate[integrand, theta];
- defintegral = (indefintegral /. {r->5, z0 -> 0, theta -> 2*Pi})-
- (indefintegral /. {r -> 5, z0-> 0, theta -> 0})
- r = 5;
- z0 = 3;
- contour = z0 + r*Exp[I theta];
- f = (z - 3)^2*(z^3 + 1);
- integrand = ((D[f, z] / f ) /. z -> contour)*D[contour, theta];
- defintegral = Integrate[integrand, {theta, 0, 2*Pi}]
Add Comment
Please, Sign In to add comment