UNPKG

643 Btext/coffeescriptView Raw
1test_defint = ->
2 run_test [
3 "defint(x^2,y,0,sqrt(1-x^2),x,-1,1)",
4 "1/8*pi",
5
6 # from the eigenmath manual
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 # from the eigenmath manual
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 # from the eigenmath manual
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