Advertisement
Guest User

Untitled

a guest
Mar 28th, 2015
239
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.32 KB | None | 0 0
  1. ds[e_, th_]:= a^2r^2(P[e, th]^2)(P[e, th]+P[e, th]^(-1)-1+Cos[th]^2)/2
  2.  
  3. P[e_, th_]:=1/(1+(e/(m*c^2))(1-Cos[th]))
  4.  
  5. s=Integrate[ds[10^(-15), th],{th, 0, 2 Pi}]
  6.  
  7. 1.66118*10^(-25)
  8.  
  9. ds2[th_]:=ds[10^(-15), th]/s
  10.  
  11. Integrate[ds[10^(-15), th], {th, 0, 2 Pi}]/s
  12.  
  13. 1.
  14.  
  15. Integrate[ds[10^(-15), th]/s, {th, 0, 2 Pi}]
  16.  
  17. 0.000217878
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement