Advertisement
Guest User

Untitled

a guest
Apr 19th, 2018
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.23 KB | None | 0 0
  1. x[t_] = 6 Cos[t];
  2. y[t_] = 6 Sin[t];
  3. m[x_, y_] = (1 - y)/((x + 2)^2 + (y - 1)^2);
  4. n[x_, y_] = (x + 2)/((x + 2)^2 + (y - 1)^2);
  5. Together[D[n[x, y], x] - D[m[x, y], y]]
  6. Integrate[m[x[t], y[t]] * x'[t] + n[x[t], y[t]] * y'[t], {t, 0, 2Pi}]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement