UNPKG

1.24 kBtext/coffeescriptView Raw
1test_gcd = ->
2 run_test [
3
4 "gcd(30,42)",
5 "6",
6
7 "gcd(42,30)",
8 "6",
9
10 "gcd(-30,42)",
11 "6",
12
13 "gcd(42,-30)",
14 "6",
15
16 "gcd(30,-42)",
17 "6",
18
19 "gcd(-42,30)",
20 "6",
21
22 "gcd(-30,-42)",
23 "6",
24
25 "gcd(-42,-30)",
26 "6",
27
28 "gcd(x,x)",
29 "x",
30
31 "gcd(-x,x)",
32 "x",
33
34 "gcd(x,-x)",
35 "x",
36
37 "gcd(-x,-x)",
38 "-x",
39
40 "gcd(x^2,x^3)",
41 "x^2",
42
43 "gcd(x,y)",
44 "1",
45
46 "gcd(y,x)",
47 "1",
48
49 "gcd(x*y,y)",
50 "y",
51
52 "gcd(x*y,y^2)",
53 "y",
54
55 "gcd(x^2*y^2,x^3*y^3)",
56 "x^2*y^2",
57
58 "gcd(x^2,x^3)",
59 "x^2",
60
61 # gcd of expr
62
63 "gcd(x+y,x+z)",
64 "1",
65
66 "gcd(x+y,x+y)",
67 "x+y",
68
69 "gcd(x+y,2*x+2*y)",
70 "x+y",
71
72 "gcd(-x-y,x+y)",
73 "x+y",
74
75 "gcd(4*x+4*y,6*x+6*y)",
76 "2*x+2*y",
77
78 "gcd(4*x+4*y+4,6*x+6*y+6)",
79 "2+2*x+2*y",
80
81 "gcd(4*x+4*y+4,6*x+6*y+12)",
82 "1",
83
84 "gcd(27*t^3+y^3+9*t*y^2+27*t^2*y,t+y)",
85 "1",
86
87 # gcd expr factor
88
89 "gcd(2*a^2*x^2+a*x+a*b,a)",
90 "a",
91
92 "gcd(2*a^2*x^2+a*x+a*b,a^2)",
93 "a",
94
95 "gcd(2*a^2*x^2+2*a*x+2*a*b,a)",
96 "a",
97
98 # gcd expr term
99
100 "gcd(2*a^2*x^2+2*a*x+2*a*b,2*a)",
101 "2*a",
102
103 "gcd(2*a^2*x^2+2*a*x+2*a*b,3*a)",
104 "a",
105
106 "gcd(2*a^2*x^2+2*a*x+2*a*b,4*a)",
107 "2*a",
108
109 # gcd factor factor
110
111 "gcd(x,x^2)",
112 "x",
113
114 "gcd(x,x^a)",
115 "1",
116
117 # multiple arguments
118
119 "gcd(12,18,9)",
120 "3",
121 ]