UNPKG

algebrite

Version:

Computer Algebra System in Coffeescript

github.com/davidedc/Algebrite

davidedc/Algebrite

88 lines (58 loc) • 1.1 kB
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
79
80
81
82
83
84
85
86
87
88
test_check = -> if DEBUG then console.log "test_check ----------------------------" run_test [ # note how check can turn an assignment # into a test, so in this case a is not # assigned anything "check(a=b)", "check(a=b)", "a", "a", "check(a)", "check(a)", "check(a=a)", "1", "check(a==a)", "1", "check(a===a)", "check(a=== ? a)\nStop: syntax error", "check(a+1=a)", "0", "check(a+1==a)", "0", "check(a+1===a)", "check(a+1=== ? a)\nStop: syntax error", "check(1)", "1", "check(0)", "0", "check(and(1,0))", "0", "check(and(1,1))", "1", # if passed a value, check if non-zero "check(pi)", "1", "check(2)", "1", "check(-2)", "1", "check(sqrt(2))", "1", "check(sqrt(-1))", "1", "check(sqrt(pi/4)-sqrt(i))", "1", "check(1+i)", "1", "check([0,0])", "0", "check([1,2])", "1", "check([1+i,2])", "1", "check([a,2])", "check([a,2])", "check(1-i)", "1", ]