aboutsummaryrefslogtreecommitdiff
path: root/specifics/arith-test.pd
blob: 31362286bd8897a7fb9d89e181fd028ac4221ae1 (plain)
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
#N canvas 365 120 687 494 10;
#X text 18 12 This is the testclass for + \, - \, * \, / \, % \, mod
\, ^ \, & \, |;
#X text 78 136 Abelian Groups:;
#X text 80 229 Abelian Monoids:;
#X text 79 299 Rings (incl Fields):;
#X obj 134 87 r \$0-b;
#X obj 299 87 r \$0-b;
#X obj 450 87 r \$0-b;
#X obj 16 59 s \$0-b;
#X obj 16 40 inlet bang;
#X obj 14 414 r \$0-r;
#X obj 14 433 outlet reports;
#X obj 134 406 s \$0-r;
#X obj 299 406 s \$0-r;
#X obj 450 406 s \$0-r;
#X obj 134 157 commutative-test \$1 +;
#X obj 134 177 commutative-test \$1 *;
#X obj 134 197 commutative-test \$1 ^;
#X obj 134 247 commutative-test \$1 &;
#X obj 134 267 commutative-test \$1 |;
#X obj 134 317 distributive-test \$1 + *;
#X obj 134 337 distributive-test \$1 ^ &;
#X obj 299 247 associative-test \$1 &;
#X obj 299 267 associative-test \$1 |;
#X obj 299 157 associative-test \$1 +;
#X obj 299 177 associative-test \$1 *;
#X obj 299 197 associative-test \$1 ^;
#X obj 450 197 invertible-test \$1 ^ ^;
#X obj 450 177 invertible-test \$1 * /;
#X obj 450 157 invertible-test \$1 + -;
#X connect 4 0 14 0;
#X connect 4 0 15 0;
#X connect 4 0 16 0;
#X connect 4 0 17 0;
#X connect 4 0 18 0;
#X connect 4 0 19 0;
#X connect 4 0 20 0;
#X connect 5 0 21 0;
#X connect 5 0 22 0;
#X connect 5 0 23 0;
#X connect 5 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 26 0;
#X connect 6 0 27 0;
#X connect 6 0 28 0;
#X connect 8 0 7 0;
#X connect 9 0 10 0;
#X connect 14 0 11 0;
#X connect 15 0 11 0;
#X connect 16 0 11 0;
#X connect 17 0 11 0;
#X connect 18 0 11 0;
#X connect 19 0 11 0;
#X connect 20 0 11 0;
#X connect 21 0 12 0;
#X connect 22 0 12 0;
#X connect 23 0 12 0;
#X connect 24 0 12 0;
#X connect 25 0 12 0;
#X connect 26 0 13 0;
#X connect 27 0 13 0;
#X connect 28 0 13 0;