UNPKG

algebrite

Version:

Computer Algebra System in Coffeescript

github.com/davidedc/Algebrite

davidedc/Algebrite

78 lines (55 loc) • 926 B
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
test_multiply = -> if DEBUG then console.log "test_multiply ----------------------------" run_test [ "0*a", "0", "a*0", "0", "1*a", "a", "a*1", "a", "0.0*a", "0.0", "a*0.0", "0.0", "1.0*a", "1.0*a", "a*1.0", "1.0*a", "a*a", "a^2", "a^2*a", "a^3", "a*a^2", "a^3", "a^2*a^2", "a^4", "2^a*2^(3-a)", # symbolic exponents cancel "8", "sqrt(2)/2", # leave the roots nice and # clean in numerator, avoid these # forms #"2^(-1/2)", "1/2*2^(1/2)", "2/sqrt(2)", "2^(1/2)", "-sqrt(2)/2", # avoid having roots in denominator #"-1/(2^(1/2))", "-1/2*2^(1/2)", "2^(1/2-a)*2^a/10", # avoid roots in denominator #"1/(5*2^(1/2))", "1/10*2^(1/2)", "i/4", "1/4*i", "1/(4 i)", "-1/4*i", # ensure 1.0 is not discarded "1.0 pi 1/2", "1.5708", "1.0 1/2 pi", "1.5708", ]