1 | test_defint = ->
|
2 | run_test [
|
3 | "defint(x^2,y,0,sqrt(1-x^2),x,-1,1)",
|
4 | "1/8*pi",
|
5 |
|
6 |
|
7 |
|
8 | "z=2",
|
9 | "",
|
10 |
|
11 | "P=[x,y,z]",
|
12 | "",
|
13 |
|
14 | "a=abs(cross(d(P,x),d(P,y)))",
|
15 | "",
|
16 |
|
17 | "defint(a,y,-sqrt(1-x^2),sqrt(1-x^2),x,-1,1)",
|
18 | "pi",
|
19 |
|
20 |
|
21 |
|
22 | "z=x^2+2y",
|
23 | "",
|
24 |
|
25 | "P=[x,y,z]",
|
26 | "",
|
27 |
|
28 | "a=abs(cross(d(P,x),d(P,y)))",
|
29 | "",
|
30 |
|
31 | "defint(a,x,0,1,y,0,1)",
|
32 | "3/2+5/8*log(5)",
|
33 |
|
34 |
|
35 |
|
36 | "x=u*cos(v)",
|
37 | "",
|
38 |
|
39 | "y=u*sin(v)",
|
40 | "",
|
41 |
|
42 | "z=v",
|
43 | "",
|
44 |
|
45 | "S=[x,y,z]",
|
46 | "",
|
47 |
|
48 | "a=abs(cross(d(S,u),d(S,v)))",
|
49 | "",
|
50 |
|
51 | "defint(a,u,0,1,v,0,3pi)",
|
52 | "3/2*pi*log(1+2^(1/2))+3*pi/(2^(1/2))",
|
53 | ]
|
54 |
|
55 |
|