v0.14.0
Loading...
Searching...
No Matches
test_Levi_Civita_02.cpp
Go to the documentation of this file.
3#include <iostream>
4using namespace FTensor;
5using namespace std;
6
8{
9 Index<'i', 2> i;
10
11 Index<'k', 3> k;
12 Index<'l', 3> l;
13 Index<'m', 3> m;
14
15 Index<'n', 4> n;
16 Index<'o', 4> o;
17 Index<'p', 4> p;
18 Index<'q', 4> q;
19
20 Number<0> N0;
21 Number<1> N1;
22 Number<2> N2;
23
24 /* Test Levi_Civita Rank 2 */
25 test_for_zero(levi_civita(0, i)(0), "levi_civita(0,i)(0)");
26 test_for_zero(levi_civita(0, i)(1) - 1, "levi_civita(0,i)(1)");
27 test_for_zero(levi_civita(1, i)(0) + 1, "levi_civita(1,i)(0)");
28 test_for_zero(levi_civita(1, i)(1), "levi_civita(1,i)(1)");
29
30 test_for_zero(levi_civita(i, 0)(0), "levi_civita(i,0)(0)");
31 test_for_zero(levi_civita(i, 0)(1) + 1, "levi_civita(i,0)(1)");
32 test_for_zero(levi_civita(i, 1)(0) - 1, "levi_civita(i,1)(0)");
33 test_for_zero(levi_civita(i, 1)(1), "levi_civita(i,1)(1)");
34
35 /* Test Levi_Civita Rank 3 */
36 test_for_zero(levi_civita(0, l, m)(0, 0), "levi_civita(0,l,m)(0,0)");
37 test_for_zero(levi_civita(0, l, m)(0, 1), "levi_civita(0,l,m)(0,1)");
38 test_for_zero(levi_civita(0, l, m)(0, 2), "levi_civita(0,l,m)(0,2)");
39 test_for_zero(levi_civita(0, l, m)(1, 0), "levi_civita(0,l,m)(1,0)");
40 test_for_zero(levi_civita(0, l, m)(1, 1), "levi_civita(0,l,m)(1,1)");
41 test_for_zero(levi_civita(0, l, m)(1, 2) - 1, "levi_civita(0,l,m)(1,2)");
42 test_for_zero(levi_civita(0, l, m)(2, 0), "levi_civita(0,l,m)(2,0)");
43 test_for_zero(levi_civita(0, l, m)(2, 1) + 1, "levi_civita(0,l,m)(2,1)");
44 test_for_zero(levi_civita(0, l, m)(2, 2), "levi_civita(0,l,m)(2,2)");
45
46 test_for_zero(levi_civita(1, l, m)(0, 0), "levi_civita(1,l,m)(0,0)");
47 test_for_zero(levi_civita(1, l, m)(0, 1), "levi_civita(1,l,m)(0,1)");
48 test_for_zero(levi_civita(1, l, m)(0, 2) + 1, "levi_civita(1,l,m)(0,2)");
49 test_for_zero(levi_civita(1, l, m)(1, 0), "levi_civita(1,l,m)(1,0)");
50 test_for_zero(levi_civita(1, l, m)(1, 1), "levi_civita(1,l,m)(1,1)");
51 test_for_zero(levi_civita(1, l, m)(1, 2), "levi_civita(1,l,m)(1,2)");
52 test_for_zero(levi_civita(1, l, m)(2, 0) - 1, "levi_civita(1,l,m)(2,0)");
53 test_for_zero(levi_civita(1, l, m)(2, 1), "levi_civita(1,l,m)(2,1)");
54 test_for_zero(levi_civita(1, l, m)(2, 2), "levi_civita(1,l,m)(2,2)");
55
56 test_for_zero(levi_civita(2, l, m)(0, 0), "levi_civita(2,l,m)(0,0)");
57 test_for_zero(levi_civita(2, l, m)(0, 1) - 1, "levi_civita(2,l,m)(0,1)");
58 test_for_zero(levi_civita(2, l, m)(0, 2), "levi_civita(2,l,m)(0,2)");
59 test_for_zero(levi_civita(2, l, m)(1, 0) + 1, "levi_civita(2,l,m)(1,0)");
60 test_for_zero(levi_civita(2, l, m)(1, 1), "levi_civita(2,l,m)(1,1)");
61 test_for_zero(levi_civita(2, l, m)(1, 2), "levi_civita(2,l,m)(1,2)");
62 test_for_zero(levi_civita(2, l, m)(2, 0), "levi_civita(2,l,m)(2,0)");
63 test_for_zero(levi_civita(2, l, m)(2, 1), "levi_civita(2,l,m)(2,1)");
64 test_for_zero(levi_civita(2, l, m)(2, 2), "levi_civita(2,l,m)(2,2)");
65
66 test_for_zero(levi_civita(k, 0, m)(0, 0), "levi_civita(k,0,m)(0,0)");
67 test_for_zero(levi_civita(k, 0, m)(0, 1), "levi_civita(k,0,m)(0,1)");
68 test_for_zero(levi_civita(k, 0, m)(0, 2), "levi_civita(k,0,m)(0,2)");
69 test_for_zero(levi_civita(k, 0, m)(1, 0), "levi_civita(k,0,m)(1,0)");
70 test_for_zero(levi_civita(k, 0, m)(1, 1), "levi_civita(k,0,m)(1,1)");
71 test_for_zero(levi_civita(k, 0, m)(1, 2) + 1, "levi_civita(k,0,m)(1,2)");
72 test_for_zero(levi_civita(k, 0, m)(2, 0), "levi_civita(k,0,m)(2,0)");
73 test_for_zero(levi_civita(k, 0, m)(2, 1) - 1, "levi_civita(k,0,m)(2,1)");
74 test_for_zero(levi_civita(k, 0, m)(2, 2), "levi_civita(k,0,m)(2,2)");
75
76 test_for_zero(levi_civita(k, 1, m)(0, 0), "levi_civita(k,1,m)(0,0)");
77 test_for_zero(levi_civita(k, 1, m)(0, 1), "levi_civita(k,1,m)(0,1)");
78 test_for_zero(levi_civita(k, 1, m)(0, 2) - 1, "levi_civita(k,1,m)(0,2)");
79 test_for_zero(levi_civita(k, 1, m)(1, 0), "levi_civita(k,1,m)(1,0)");
80 test_for_zero(levi_civita(k, 1, m)(1, 1), "levi_civita(k,1,m)(1,1)");
81 test_for_zero(levi_civita(k, 1, m)(1, 2), "levi_civita(k,1,m)(1,2)");
82 test_for_zero(levi_civita(k, 1, m)(2, 0) + 1, "levi_civita(k,1,m)(2,0)");
83 test_for_zero(levi_civita(k, 1, m)(2, 1), "levi_civita(k,1,m)(2,1)");
84 test_for_zero(levi_civita(k, 1, m)(2, 2), "levi_civita(k,1,m)(2,2)");
85
86 test_for_zero(levi_civita(k, 2, m)(0, 0), "levi_civita(k,2,m)(0,0)");
87 test_for_zero(levi_civita(k, 2, m)(0, 1) + 1, "levi_civita(k,2,m)(0,1)");
88 test_for_zero(levi_civita(k, 2, m)(0, 2), "levi_civita(k,2,m)(0,2)");
89 test_for_zero(levi_civita(k, 2, m)(1, 0) - 1, "levi_civita(k,2,m)(1,0)");
90 test_for_zero(levi_civita(k, 2, m)(1, 1), "levi_civita(k,2,m)(1,1)");
91 test_for_zero(levi_civita(k, 2, m)(1, 2), "levi_civita(k,2,m)(1,2)");
92 test_for_zero(levi_civita(k, 2, m)(2, 0), "levi_civita(k,2,m)(2,0)");
93 test_for_zero(levi_civita(k, 2, m)(2, 1), "levi_civita(k,2,m)(2,1)");
94 test_for_zero(levi_civita(k, 2, m)(2, 2), "levi_civita(k,2,m)(2,2)");
95
96 test_for_zero(levi_civita(k, l, 0)(0, 0), "levi_civita(k,l,0)(0,0)");
97 test_for_zero(levi_civita(k, l, 0)(0, 1), "levi_civita(k,l,0)(0,1)");
98 test_for_zero(levi_civita(k, l, 0)(0, 2), "levi_civita(k,l,0)(0,2)");
99 test_for_zero(levi_civita(k, l, 0)(1, 0), "levi_civita(k,l,0)(1,0)");
100 test_for_zero(levi_civita(k, l, 0)(1, 1), "levi_civita(k,l,0)(1,1)");
101 test_for_zero(levi_civita(k, l, 0)(1, 2) - 1, "levi_civita(k,l,0)(1,2)");
102 test_for_zero(levi_civita(k, l, 0)(2, 0), "levi_civita(k,l,0)(2,0)");
103 test_for_zero(levi_civita(k, l, 0)(2, 1) + 1, "levi_civita(k,l,0)(2,1)");
104 test_for_zero(levi_civita(k, l, 0)(2, 2), "levi_civita(k,l,0)(2,2)");
105
106 test_for_zero(levi_civita(k, l, 1)(0, 0), "levi_civita(k,l,1)(0,0)");
107 test_for_zero(levi_civita(k, l, 1)(0, 1), "levi_civita(k,l,1)(0,1)");
108 test_for_zero(levi_civita(k, l, 1)(0, 2) + 1, "levi_civita(k,l,1)(0,2)");
109 test_for_zero(levi_civita(k, l, 1)(1, 0), "levi_civita(k,l,1)(1,0)");
110 test_for_zero(levi_civita(k, l, 1)(1, 1), "levi_civita(k,l,1)(1,1)");
111 test_for_zero(levi_civita(k, l, 1)(1, 2), "levi_civita(k,l,1)(1,2)");
112 test_for_zero(levi_civita(k, l, 1)(2, 0) - 1, "levi_civita(k,l,1)(2,0)");
113 test_for_zero(levi_civita(k, l, 1)(2, 1), "levi_civita(k,l,1)(2,1)");
114 test_for_zero(levi_civita(k, l, 1)(2, 2), "levi_civita(k,l,1)(2,2)");
115
116 test_for_zero(levi_civita(k, l, 2)(0, 0), "levi_civita(k,l,2)(0,0)");
117 test_for_zero(levi_civita(k, l, 2)(0, 1) - 1, "levi_civita(k,l,2)(0,1)");
118 test_for_zero(levi_civita(k, l, 2)(0, 2), "levi_civita(k,l,2)(0,2)");
119 test_for_zero(levi_civita(k, l, 2)(1, 0) + 1, "levi_civita(k,l,2)(1,0)");
120 test_for_zero(levi_civita(k, l, 2)(1, 1), "levi_civita(k,l,2)(1,1)");
121 test_for_zero(levi_civita(k, l, 2)(1, 2), "levi_civita(k,l,2)(1,2)");
122 test_for_zero(levi_civita(k, l, 2)(2, 0), "levi_civita(k,l,2)(2,0)");
123 test_for_zero(levi_civita(k, l, 2)(2, 1), "levi_civita(k,l,2)(2,1)");
124 test_for_zero(levi_civita(k, l, 2)(2, 2), "levi_civita(k,l,2)(2,2)");
125
126 /* Test Levi_Civita Rank 4 */
127 test_for_zero(levi_civita(0, o, p, q)(0, 0, 0),
128 "levi_civita(0,o,p,q)(0,0,0)");
129 test_for_zero(levi_civita(0, o, p, q)(0, 0, 1),
130 "levi_civita(0,o,p,q)(0,0,1)");
131 test_for_zero(levi_civita(0, o, p, q)(0, 0, 2),
132 "levi_civita(0,o,p,q)(0,0,2)");
133 test_for_zero(levi_civita(0, o, p, q)(0, 0, 3),
134 "levi_civita(0,o,p,q)(0,0,3)");
135 test_for_zero(levi_civita(0, o, p, q)(0, 1, 0),
136 "levi_civita(0,o,p,q)(0,1,0)");
137 test_for_zero(levi_civita(0, o, p, q)(0, 1, 1),
138 "levi_civita(0,o,p,q)(0,1,1)");
139 test_for_zero(levi_civita(0, o, p, q)(0, 1, 2),
140 "levi_civita(0,o,p,q)(0,1,2)");
141 test_for_zero(levi_civita(0, o, p, q)(0, 1, 3),
142 "levi_civita(0,o,p,q)(0,1,3)");
143 test_for_zero(levi_civita(0, o, p, q)(0, 2, 0),
144 "levi_civita(0,o,p,q)(0,2,0)");
145 test_for_zero(levi_civita(0, o, p, q)(0, 2, 1),
146 "levi_civita(0,o,p,q)(0,2,1)");
147 test_for_zero(levi_civita(0, o, p, q)(0, 2, 2),
148 "levi_civita(0,o,p,q)(0,2,2)");
149 test_for_zero(levi_civita(0, o, p, q)(0, 2, 3),
150 "levi_civita(0,o,p,q)(0,2,3)");
151 test_for_zero(levi_civita(0, o, p, q)(0, 3, 0),
152 "levi_civita(0,o,p,q)(0,3,0)");
153 test_for_zero(levi_civita(0, o, p, q)(0, 3, 1),
154 "levi_civita(0,o,p,q)(0,3,1)");
155 test_for_zero(levi_civita(0, o, p, q)(0, 3, 2),
156 "levi_civita(0,o,p,q)(0,3,2)");
157 test_for_zero(levi_civita(0, o, p, q)(0, 3, 3),
158 "levi_civita(0,o,p,q)(0,3,3)");
159 test_for_zero(levi_civita(0, o, p, q)(1, 0, 0),
160 "levi_civita(0,o,p,q)(1,0,0)");
161 test_for_zero(levi_civita(0, o, p, q)(1, 0, 1),
162 "levi_civita(0,o,p,q)(1,0,1)");
163 test_for_zero(levi_civita(0, o, p, q)(1, 0, 2),
164 "levi_civita(0,o,p,q)(1,0,2)");
165 test_for_zero(levi_civita(0, o, p, q)(1, 0, 3),
166 "levi_civita(0,o,p,q)(1,0,3)");
167 test_for_zero(levi_civita(0, o, p, q)(1, 1, 0),
168 "levi_civita(0,o,p,q)(1,1,0)");
169 test_for_zero(levi_civita(0, o, p, q)(1, 1, 1),
170 "levi_civita(0,o,p,q)(1,1,1)");
171 test_for_zero(levi_civita(0, o, p, q)(1, 1, 2),
172 "levi_civita(0,o,p,q)(1,1,2)");
173 test_for_zero(levi_civita(0, o, p, q)(1, 1, 3),
174 "levi_civita(0,o,p,q)(1,1,3)");
175 test_for_zero(levi_civita(0, o, p, q)(1, 2, 0),
176 "levi_civita(0,o,p,q)(1,2,0)");
177 test_for_zero(levi_civita(0, o, p, q)(1, 2, 1),
178 "levi_civita(0,o,p,q)(1,2,1)");
179 test_for_zero(levi_civita(0, o, p, q)(1, 2, 2),
180 "levi_civita(0,o,p,q)(1,2,2)");
181 test_for_zero(levi_civita(0, o, p, q)(1, 2, 3) - 1,
182 "levi_civita(0,o,p,q)(1,2,3)");
183 test_for_zero(levi_civita(0, o, p, q)(1, 3, 0),
184 "levi_civita(0,o,p,q)(1,3,0)");
185 test_for_zero(levi_civita(0, o, p, q)(1, 3, 1),
186 "levi_civita(0,o,p,q)(1,3,1)");
187 test_for_zero(levi_civita(0, o, p, q)(1, 3, 2) + 1,
188 "levi_civita(0,o,p,q)(1,3,2)");
189 test_for_zero(levi_civita(0, o, p, q)(1, 3, 3),
190 "levi_civita(0,o,p,q)(1,3,3)");
191 test_for_zero(levi_civita(0, o, p, q)(2, 0, 0),
192 "levi_civita(0,o,p,q)(2,0,0)");
193 test_for_zero(levi_civita(0, o, p, q)(2, 0, 1),
194 "levi_civita(0,o,p,q)(2,0,1)");
195 test_for_zero(levi_civita(0, o, p, q)(2, 0, 2),
196 "levi_civita(0,o,p,q)(2,0,2)");
197 test_for_zero(levi_civita(0, o, p, q)(2, 0, 3),
198 "levi_civita(0,o,p,q)(2,0,3)");
199 test_for_zero(levi_civita(0, o, p, q)(2, 1, 0),
200 "levi_civita(0,o,p,q)(2,1,0)");
201 test_for_zero(levi_civita(0, o, p, q)(2, 1, 1),
202 "levi_civita(0,o,p,q)(2,1,1)");
203 test_for_zero(levi_civita(0, o, p, q)(2, 1, 2),
204 "levi_civita(0,o,p,q)(2,1,2)");
205 test_for_zero(levi_civita(0, o, p, q)(2, 1, 3) + 1,
206 "levi_civita(0,o,p,q)(2,1,3)");
207 test_for_zero(levi_civita(0, o, p, q)(2, 2, 0),
208 "levi_civita(0,o,p,q)(2,2,0)");
209 test_for_zero(levi_civita(0, o, p, q)(2, 2, 1),
210 "levi_civita(0,o,p,q)(2,2,1)");
211 test_for_zero(levi_civita(0, o, p, q)(2, 2, 2),
212 "levi_civita(0,o,p,q)(2,2,2)");
213 test_for_zero(levi_civita(0, o, p, q)(2, 2, 3),
214 "levi_civita(0,o,p,q)(2,2,3)");
215 test_for_zero(levi_civita(0, o, p, q)(2, 3, 0),
216 "levi_civita(0,o,p,q)(2,3,0)");
217 test_for_zero(levi_civita(0, o, p, q)(2, 3, 1) - 1,
218 "levi_civita(0,o,p,q)(2,3,1)");
219 test_for_zero(levi_civita(0, o, p, q)(2, 3, 2),
220 "levi_civita(0,o,p,q)(2,3,2)");
221 test_for_zero(levi_civita(0, o, p, q)(2, 3, 3),
222 "levi_civita(0,o,p,q)(2,3,3)");
223 test_for_zero(levi_civita(0, o, p, q)(3, 0, 0),
224 "levi_civita(0,o,p,q)(3,0,0)");
225 test_for_zero(levi_civita(0, o, p, q)(3, 0, 1),
226 "levi_civita(0,o,p,q)(3,0,1)");
227 test_for_zero(levi_civita(0, o, p, q)(3, 0, 2),
228 "levi_civita(0,o,p,q)(3,0,2)");
229 test_for_zero(levi_civita(0, o, p, q)(3, 0, 3),
230 "levi_civita(0,o,p,q)(3,0,3)");
231 test_for_zero(levi_civita(0, o, p, q)(3, 1, 0),
232 "levi_civita(0,o,p,q)(3,1,0)");
233 test_for_zero(levi_civita(0, o, p, q)(3, 1, 1),
234 "levi_civita(0,o,p,q)(3,1,1)");
235 test_for_zero(levi_civita(0, o, p, q)(3, 1, 2) - 1,
236 "levi_civita(0,o,p,q)(3,1,2)");
237 test_for_zero(levi_civita(0, o, p, q)(3, 1, 3),
238 "levi_civita(0,o,p,q)(3,1,3)");
239 test_for_zero(levi_civita(0, o, p, q)(3, 2, 0),
240 "levi_civita(0,o,p,q)(3,2,0)");
241 test_for_zero(levi_civita(0, o, p, q)(3, 2, 1) + 1,
242 "levi_civita(0,o,p,q)(3,2,1)");
243 test_for_zero(levi_civita(0, o, p, q)(3, 2, 2),
244 "levi_civita(0,o,p,q)(3,2,2)");
245 test_for_zero(levi_civita(0, o, p, q)(3, 2, 3),
246 "levi_civita(0,o,p,q)(3,2,3)");
247 test_for_zero(levi_civita(0, o, p, q)(3, 3, 0),
248 "levi_civita(0,o,p,q)(3,3,0)");
249 test_for_zero(levi_civita(0, o, p, q)(3, 3, 1),
250 "levi_civita(0,o,p,q)(3,3,1)");
251 test_for_zero(levi_civita(0, o, p, q)(3, 3, 2),
252 "levi_civita(0,o,p,q)(3,3,2)");
253 test_for_zero(levi_civita(0, o, p, q)(3, 3, 3),
254 "levi_civita(0,o,p,q)(3,3,3)");
255
256 test_for_zero(levi_civita(1, o, p, q)(0, 0, 0),
257 "levi_civita(1,o,p,q)(0,0,0)");
258 test_for_zero(levi_civita(1, o, p, q)(0, 0, 1),
259 "levi_civita(1,o,p,q)(0,0,1)");
260 test_for_zero(levi_civita(1, o, p, q)(0, 0, 2),
261 "levi_civita(1,o,p,q)(0,0,2)");
262 test_for_zero(levi_civita(1, o, p, q)(0, 0, 3),
263 "levi_civita(1,o,p,q)(0,0,3)");
264 test_for_zero(levi_civita(1, o, p, q)(0, 1, 0),
265 "levi_civita(1,o,p,q)(0,1,0)");
266 test_for_zero(levi_civita(1, o, p, q)(0, 1, 1),
267 "levi_civita(1,o,p,q)(0,1,1)");
268 test_for_zero(levi_civita(1, o, p, q)(0, 1, 2),
269 "levi_civita(1,o,p,q)(0,1,2)");
270 test_for_zero(levi_civita(1, o, p, q)(0, 1, 3),
271 "levi_civita(1,o,p,q)(0,1,3)");
272 test_for_zero(levi_civita(1, o, p, q)(0, 2, 0),
273 "levi_civita(1,o,p,q)(0,2,0)");
274 test_for_zero(levi_civita(1, o, p, q)(0, 2, 1),
275 "levi_civita(1,o,p,q)(0,2,1)");
276 test_for_zero(levi_civita(1, o, p, q)(0, 2, 2),
277 "levi_civita(1,o,p,q)(0,2,2)");
278 test_for_zero(levi_civita(1, o, p, q)(0, 2, 3) + 1,
279 "levi_civita(1,o,p,q)(0,2,3)");
280 test_for_zero(levi_civita(1, o, p, q)(1, 0, 0),
281 "levi_civita(1,o,p,q)(1,0,0)");
282 test_for_zero(levi_civita(1, o, p, q)(1, 0, 1),
283 "levi_civita(1,o,p,q)(1,0,1)");
284 test_for_zero(levi_civita(1, o, p, q)(1, 0, 2),
285 "levi_civita(1,o,p,q)(1,0,2)");
286 test_for_zero(levi_civita(1, o, p, q)(1, 0, 3),
287 "levi_civita(1,o,p,q)(1,0,3)");
288 test_for_zero(levi_civita(1, o, p, q)(1, 1, 0),
289 "levi_civita(1,o,p,q)(1,1,0)");
290 test_for_zero(levi_civita(1, o, p, q)(1, 1, 1),
291 "levi_civita(1,o,p,q)(1,1,1)");
292 test_for_zero(levi_civita(1, o, p, q)(1, 1, 2),
293 "levi_civita(1,o,p,q)(1,1,2)");
294 test_for_zero(levi_civita(1, o, p, q)(1, 1, 3),
295 "levi_civita(1,o,p,q)(1,1,3)");
296 test_for_zero(levi_civita(1, o, p, q)(1, 2, 0),
297 "levi_civita(1,o,p,q)(1,2,0)");
298 test_for_zero(levi_civita(1, o, p, q)(1, 2, 1),
299 "levi_civita(1,o,p,q)(1,2,1)");
300 test_for_zero(levi_civita(1, o, p, q)(1, 2, 2),
301 "levi_civita(1,o,p,q)(1,2,2)");
302 test_for_zero(levi_civita(1, o, p, q)(1, 2, 3),
303 "levi_civita(1,o,p,q)(1,2,3)");
304 test_for_zero(levi_civita(1, o, p, q)(1, 3, 0),
305 "levi_civita(1,o,p,q)(1,3,0)");
306 test_for_zero(levi_civita(1, o, p, q)(1, 3, 1),
307 "levi_civita(1,o,p,q)(1,3,1)");
308 test_for_zero(levi_civita(1, o, p, q)(1, 3, 2),
309 "levi_civita(1,o,p,q)(1,3,2)");
310 test_for_zero(levi_civita(1, o, p, q)(1, 3, 3),
311 "levi_civita(1,o,p,q)(1,3,3)");
312 test_for_zero(levi_civita(1, o, p, q)(2, 0, 0),
313 "levi_civita(1,o,p,q)(2,0,0)");
314 test_for_zero(levi_civita(1, o, p, q)(2, 0, 1),
315 "levi_civita(1,o,p,q)(2,0,1)");
316 test_for_zero(levi_civita(1, o, p, q)(2, 0, 2),
317 "levi_civita(1,o,p,q)(2,0,2)");
318 test_for_zero(levi_civita(1, o, p, q)(2, 0, 3) - 1,
319 "levi_civita(1,o,p,q)(2,0,3)");
320 test_for_zero(levi_civita(1, o, p, q)(2, 1, 0),
321 "levi_civita(1,o,p,q)(2,1,0)");
322 test_for_zero(levi_civita(1, o, p, q)(2, 1, 1),
323 "levi_civita(1,o,p,q)(2,1,1)");
324 test_for_zero(levi_civita(1, o, p, q)(2, 1, 2),
325 "levi_civita(1,o,p,q)(2,1,2)");
326 test_for_zero(levi_civita(1, o, p, q)(2, 1, 3),
327 "levi_civita(1,o,p,q)(2,1,3)");
328 test_for_zero(levi_civita(1, o, p, q)(2, 2, 0),
329 "levi_civita(1,o,p,q)(2,2,0)");
330 test_for_zero(levi_civita(1, o, p, q)(2, 2, 1),
331 "levi_civita(1,o,p,q)(2,2,1)");
332 test_for_zero(levi_civita(1, o, p, q)(2, 2, 2),
333 "levi_civita(1,o,p,q)(2,2,2)");
334 test_for_zero(levi_civita(1, o, p, q)(2, 2, 3),
335 "levi_civita(1,o,p,q)(2,2,3)");
336 test_for_zero(levi_civita(1, o, p, q)(2, 3, 0) + 1,
337 "levi_civita(1,o,p,q)(2,3,0)");
338 test_for_zero(levi_civita(1, o, p, q)(2, 3, 1),
339 "levi_civita(1,o,p,q)(2,3,1)");
340 test_for_zero(levi_civita(1, o, p, q)(2, 3, 2),
341 "levi_civita(1,o,p,q)(2,3,2)");
342 test_for_zero(levi_civita(1, o, p, q)(2, 3, 3),
343 "levi_civita(1,o,p,q)(2,3,3)");
344 test_for_zero(levi_civita(1, o, p, q)(3, 0, 0),
345 "levi_civita(1,o,p,q)(3,0,0)");
346 test_for_zero(levi_civita(1, o, p, q)(3, 0, 1),
347 "levi_civita(1,o,p,q)(3,0,1)");
348 test_for_zero(levi_civita(1, o, p, q)(3, 0, 2) + 1,
349 "levi_civita(1,o,p,q)(3,0,2)");
350 test_for_zero(levi_civita(1, o, p, q)(3, 0, 3),
351 "levi_civita(1,o,p,q)(3,0,3)");
352 test_for_zero(levi_civita(1, o, p, q)(3, 1, 0),
353 "levi_civita(1,o,p,q)(3,1,0)");
354 test_for_zero(levi_civita(1, o, p, q)(3, 1, 1),
355 "levi_civita(1,o,p,q)(3,1,1)");
356 test_for_zero(levi_civita(1, o, p, q)(3, 1, 2),
357 "levi_civita(1,o,p,q)(3,1,2)");
358 test_for_zero(levi_civita(1, o, p, q)(3, 1, 3),
359 "levi_civita(1,o,p,q)(3,1,3)");
360 test_for_zero(levi_civita(1, o, p, q)(3, 2, 0) - 1,
361 "levi_civita(1,o,p,q)(3,2,0)");
362 test_for_zero(levi_civita(1, o, p, q)(3, 2, 1),
363 "levi_civita(1,o,p,q)(3,2,1)");
364 test_for_zero(levi_civita(1, o, p, q)(3, 2, 2),
365 "levi_civita(1,o,p,q)(3,2,2)");
366 test_for_zero(levi_civita(1, o, p, q)(3, 2, 3),
367 "levi_civita(1,o,p,q)(3,2,3)");
368 test_for_zero(levi_civita(1, o, p, q)(3, 3, 0),
369 "levi_civita(1,o,p,q)(3,3,0)");
370 test_for_zero(levi_civita(1, o, p, q)(3, 3, 1),
371 "levi_civita(1,o,p,q)(3,3,1)");
372 test_for_zero(levi_civita(1, o, p, q)(3, 3, 2),
373 "levi_civita(1,o,p,q)(3,3,2)");
374 test_for_zero(levi_civita(1, o, p, q)(3, 3, 3),
375 "levi_civita(1,o,p,q)(3,3,3)");
376
377 test_for_zero(levi_civita(2, o, p, q)(0, 0, 0),
378 "levi_civita(2,o,p,q)(0,0,0)");
379 test_for_zero(levi_civita(2, o, p, q)(0, 0, 1),
380 "levi_civita(2,o,p,q)(0,0,1)");
381 test_for_zero(levi_civita(2, o, p, q)(0, 0, 2),
382 "levi_civita(2,o,p,q)(0,0,2)");
383 test_for_zero(levi_civita(2, o, p, q)(0, 0, 3),
384 "levi_civita(2,o,p,q)(0,0,3)");
385 test_for_zero(levi_civita(2, o, p, q)(0, 1, 0),
386 "levi_civita(2,o,p,q)(0,1,0)");
387 test_for_zero(levi_civita(2, o, p, q)(0, 1, 1),
388 "levi_civita(2,o,p,q)(0,1,1)");
389 test_for_zero(levi_civita(2, o, p, q)(0, 1, 2),
390 "levi_civita(2,o,p,q)(0,1,2)");
391 test_for_zero(levi_civita(2, o, p, q)(0, 1, 3) - 1,
392 "levi_civita(2,o,p,q)(0,1,3)");
393 test_for_zero(levi_civita(2, o, p, q)(0, 2, 0),
394 "levi_civita(2,o,p,q)(0,2,0)");
395 test_for_zero(levi_civita(2, o, p, q)(0, 2, 1),
396 "levi_civita(2,o,p,q)(0,2,1)");
397 test_for_zero(levi_civita(2, o, p, q)(0, 2, 2),
398 "levi_civita(2,o,p,q)(0,2,2)");
399 test_for_zero(levi_civita(2, o, p, q)(0, 2, 3),
400 "levi_civita(2,o,p,q)(0,2,3)");
401 test_for_zero(levi_civita(2, o, p, q)(0, 3, 0),
402 "levi_civita(2,o,p,q)(0,3,0)");
403 test_for_zero(levi_civita(2, o, p, q)(0, 3, 1) + 1,
404 "levi_civita(2,o,p,q)(0,3,1)");
405 test_for_zero(levi_civita(2, o, p, q)(0, 3, 2),
406 "levi_civita(2,o,p,q)(0,3,2)");
407 test_for_zero(levi_civita(2, o, p, q)(0, 3, 3),
408 "levi_civita(2,o,p,q)(0,3,3)");
409 test_for_zero(levi_civita(2, o, p, q)(1, 0, 0),
410 "levi_civita(2,o,p,q)(1,0,0)");
411 test_for_zero(levi_civita(2, o, p, q)(1, 0, 1),
412 "levi_civita(2,o,p,q)(1,0,1)");
413 test_for_zero(levi_civita(2, o, p, q)(1, 0, 2),
414 "levi_civita(2,o,p,q)(1,0,2)");
415 test_for_zero(levi_civita(2, o, p, q)(1, 0, 3) + 1,
416 "levi_civita(2,o,p,q)(1,0,3)");
417 test_for_zero(levi_civita(2, o, p, q)(1, 1, 0),
418 "levi_civita(2,o,p,q)(1,1,0)");
419 test_for_zero(levi_civita(2, o, p, q)(1, 1, 1),
420 "levi_civita(2,o,p,q)(1,1,1)");
421 test_for_zero(levi_civita(2, o, p, q)(1, 1, 2),
422 "levi_civita(2,o,p,q)(1,1,2)");
423 test_for_zero(levi_civita(2, o, p, q)(1, 1, 3),
424 "levi_civita(2,o,p,q)(1,1,3)");
425 test_for_zero(levi_civita(2, o, p, q)(1, 2, 0),
426 "levi_civita(2,o,p,q)(1,2,0)");
427 test_for_zero(levi_civita(2, o, p, q)(1, 2, 1),
428 "levi_civita(2,o,p,q)(1,2,1)");
429 test_for_zero(levi_civita(2, o, p, q)(1, 2, 2),
430 "levi_civita(2,o,p,q)(1,2,2)");
431 test_for_zero(levi_civita(2, o, p, q)(1, 2, 3),
432 "levi_civita(2,o,p,q)(1,2,3)");
433 test_for_zero(levi_civita(2, o, p, q)(1, 3, 0) - 1,
434 "levi_civita(2,o,p,q)(1,3,0)");
435 test_for_zero(levi_civita(2, o, p, q)(1, 3, 1),
436 "levi_civita(2,o,p,q)(1,3,1)");
437 test_for_zero(levi_civita(2, o, p, q)(1, 3, 2),
438 "levi_civita(2,o,p,q)(1,3,2)");
439 test_for_zero(levi_civita(2, o, p, q)(1, 3, 3),
440 "levi_civita(2,o,p,q)(1,3,3)");
441 test_for_zero(levi_civita(2, o, p, q)(2, 0, 0),
442 "levi_civita(2,o,p,q)(2,0,0)");
443 test_for_zero(levi_civita(2, o, p, q)(2, 0, 1),
444 "levi_civita(2,o,p,q)(2,0,1)");
445 test_for_zero(levi_civita(2, o, p, q)(2, 0, 2),
446 "levi_civita(2,o,p,q)(2,0,2)");
447 test_for_zero(levi_civita(2, o, p, q)(2, 0, 3),
448 "levi_civita(2,o,p,q)(2,0,3)");
449 test_for_zero(levi_civita(2, o, p, q)(2, 1, 0),
450 "levi_civita(2,o,p,q)(2,1,0)");
451 test_for_zero(levi_civita(2, o, p, q)(2, 1, 1),
452 "levi_civita(2,o,p,q)(2,1,1)");
453 test_for_zero(levi_civita(2, o, p, q)(2, 1, 2),
454 "levi_civita(2,o,p,q)(2,1,2)");
455 test_for_zero(levi_civita(2, o, p, q)(2, 1, 3),
456 "levi_civita(2,o,p,q)(2,1,3)");
457 test_for_zero(levi_civita(2, o, p, q)(2, 2, 0),
458 "levi_civita(2,o,p,q)(2,2,0)");
459 test_for_zero(levi_civita(2, o, p, q)(2, 2, 1),
460 "levi_civita(2,o,p,q)(2,2,1)");
461 test_for_zero(levi_civita(2, o, p, q)(2, 2, 2),
462 "levi_civita(2,o,p,q)(2,2,2)");
463 test_for_zero(levi_civita(2, o, p, q)(2, 2, 3),
464 "levi_civita(2,o,p,q)(2,2,3)");
465 test_for_zero(levi_civita(2, o, p, q)(2, 3, 0),
466 "levi_civita(2,o,p,q)(2,3,0)");
467 test_for_zero(levi_civita(2, o, p, q)(2, 3, 1),
468 "levi_civita(2,o,p,q)(2,3,1)");
469 test_for_zero(levi_civita(2, o, p, q)(2, 3, 2),
470 "levi_civita(2,o,p,q)(2,3,2)");
471 test_for_zero(levi_civita(2, o, p, q)(2, 3, 3),
472 "levi_civita(2,o,p,q)(2,3,3)");
473 test_for_zero(levi_civita(2, o, p, q)(3, 0, 0),
474 "levi_civita(2,o,p,q)(3,0,0)");
475 test_for_zero(levi_civita(2, o, p, q)(3, 0, 1) - 1,
476 "levi_civita(2,o,p,q)(3,0,1)");
477 test_for_zero(levi_civita(2, o, p, q)(3, 0, 2),
478 "levi_civita(2,o,p,q)(3,0,2)");
479 test_for_zero(levi_civita(2, o, p, q)(3, 0, 3),
480 "levi_civita(2,o,p,q)(3,0,3)");
481 test_for_zero(levi_civita(2, o, p, q)(3, 1, 0) + 1,
482 "levi_civita(2,o,p,q)(3,1,0)");
483 test_for_zero(levi_civita(2, o, p, q)(3, 1, 1),
484 "levi_civita(2,o,p,q)(3,1,1)");
485 test_for_zero(levi_civita(2, o, p, q)(3, 1, 2),
486 "levi_civita(2,o,p,q)(3,1,2)");
487 test_for_zero(levi_civita(2, o, p, q)(3, 1, 3),
488 "levi_civita(2,o,p,q)(3,1,3)");
489 test_for_zero(levi_civita(2, o, p, q)(3, 2, 0),
490 "levi_civita(2,o,p,q)(3,2,0)");
491 test_for_zero(levi_civita(2, o, p, q)(3, 2, 1),
492 "levi_civita(2,o,p,q)(3,2,1)");
493 test_for_zero(levi_civita(2, o, p, q)(3, 2, 2),
494 "levi_civita(2,o,p,q)(3,2,2)");
495 test_for_zero(levi_civita(2, o, p, q)(3, 2, 3),
496 "levi_civita(2,o,p,q)(3,2,3)");
497 test_for_zero(levi_civita(2, o, p, q)(3, 3, 0),
498 "levi_civita(2,o,p,q)(3,3,0)");
499 test_for_zero(levi_civita(2, o, p, q)(3, 3, 1),
500 "levi_civita(2,o,p,q)(3,3,1)");
501 test_for_zero(levi_civita(2, o, p, q)(3, 3, 2),
502 "levi_civita(2,o,p,q)(3,3,2)");
503 test_for_zero(levi_civita(2, o, p, q)(3, 3, 3),
504 "levi_civita(2,o,p,q)(3,3,3)");
505
506 test_for_zero(levi_civita(3, o, p, q)(0, 0, 0),
507 "levi_civita(3,o,p,q)(0,0,0)");
508 test_for_zero(levi_civita(3, o, p, q)(0, 0, 1),
509 "levi_civita(3,o,p,q)(0,0,1)");
510 test_for_zero(levi_civita(3, o, p, q)(0, 0, 2),
511 "levi_civita(3,o,p,q)(0,0,2)");
512 test_for_zero(levi_civita(3, o, p, q)(0, 0, 3),
513 "levi_civita(3,o,p,q)(0,0,3)");
514 test_for_zero(levi_civita(3, o, p, q)(0, 1, 0),
515 "levi_civita(3,o,p,q)(0,1,0)");
516 test_for_zero(levi_civita(3, o, p, q)(0, 1, 1),
517 "levi_civita(3,o,p,q)(0,1,1)");
518 test_for_zero(levi_civita(3, o, p, q)(0, 1, 2) + 1,
519 "levi_civita(3,o,p,q)(0,1,2)");
520 test_for_zero(levi_civita(3, o, p, q)(0, 1, 3),
521 "levi_civita(3,o,p,q)(0,1,3)");
522 test_for_zero(levi_civita(3, o, p, q)(0, 2, 0),
523 "levi_civita(3,o,p,q)(0,2,0)");
524 test_for_zero(levi_civita(3, o, p, q)(0, 2, 1) - 1,
525 "levi_civita(3,o,p,q)(0,2,1)");
526 test_for_zero(levi_civita(3, o, p, q)(0, 2, 2),
527 "levi_civita(3,o,p,q)(0,2,2)");
528 test_for_zero(levi_civita(3, o, p, q)(0, 2, 3),
529 "levi_civita(3,o,p,q)(0,2,3)");
530 test_for_zero(levi_civita(3, o, p, q)(0, 3, 0),
531 "levi_civita(3,o,p,q)(0,3,0)");
532 test_for_zero(levi_civita(3, o, p, q)(0, 3, 1),
533 "levi_civita(3,o,p,q)(0,3,1)");
534 test_for_zero(levi_civita(3, o, p, q)(0, 3, 2),
535 "levi_civita(3,o,p,q)(0,3,2)");
536 test_for_zero(levi_civita(3, o, p, q)(0, 3, 3),
537 "levi_civita(3,o,p,q)(0,3,3)");
538 test_for_zero(levi_civita(3, o, p, q)(1, 0, 0),
539 "levi_civita(3,o,p,q)(1,0,0)");
540 test_for_zero(levi_civita(3, o, p, q)(1, 0, 1),
541 "levi_civita(3,o,p,q)(1,0,1)");
542 test_for_zero(levi_civita(3, o, p, q)(1, 0, 2) - 1,
543 "levi_civita(3,o,p,q)(1,0,2)");
544 test_for_zero(levi_civita(3, o, p, q)(1, 0, 3),
545 "levi_civita(3,o,p,q)(1,0,3)");
546 test_for_zero(levi_civita(3, o, p, q)(1, 1, 0),
547 "levi_civita(3,o,p,q)(1,1,0)");
548 test_for_zero(levi_civita(3, o, p, q)(1, 1, 1),
549 "levi_civita(3,o,p,q)(1,1,1)");
550 test_for_zero(levi_civita(3, o, p, q)(1, 1, 2),
551 "levi_civita(3,o,p,q)(1,1,2)");
552 test_for_zero(levi_civita(3, o, p, q)(1, 1, 3),
553 "levi_civita(3,o,p,q)(1,1,3)");
554 test_for_zero(levi_civita(3, o, p, q)(1, 2, 0) + 1,
555 "levi_civita(3,o,p,q)(1,2,0)");
556 test_for_zero(levi_civita(3, o, p, q)(1, 2, 1),
557 "levi_civita(3,o,p,q)(1,2,1)");
558 test_for_zero(levi_civita(3, o, p, q)(1, 2, 2),
559 "levi_civita(3,o,p,q)(1,2,2)");
560 test_for_zero(levi_civita(3, o, p, q)(1, 2, 3),
561 "levi_civita(3,o,p,q)(1,2,3)");
562 test_for_zero(levi_civita(3, o, p, q)(1, 3, 0),
563 "levi_civita(3,o,p,q)(1,3,0)");
564 test_for_zero(levi_civita(3, o, p, q)(1, 3, 1),
565 "levi_civita(3,o,p,q)(1,3,1)");
566 test_for_zero(levi_civita(3, o, p, q)(1, 3, 2),
567 "levi_civita(3,o,p,q)(1,3,2)");
568 test_for_zero(levi_civita(3, o, p, q)(1, 3, 3),
569 "levi_civita(3,o,p,q)(1,3,3)");
570 test_for_zero(levi_civita(3, o, p, q)(2, 0, 0),
571 "levi_civita(3,o,p,q)(2,0,0)");
572 test_for_zero(levi_civita(3, o, p, q)(2, 0, 1) + 1,
573 "levi_civita(3,o,p,q)(2,0,1)");
574 test_for_zero(levi_civita(3, o, p, q)(2, 0, 2),
575 "levi_civita(3,o,p,q)(2,0,2)");
576 test_for_zero(levi_civita(3, o, p, q)(2, 0, 3),
577 "levi_civita(3,o,p,q)(2,0,3)");
578 test_for_zero(levi_civita(3, o, p, q)(2, 1, 0) - 1,
579 "levi_civita(3,o,p,q)(2,1,0)");
580 test_for_zero(levi_civita(3, o, p, q)(2, 1, 1),
581 "levi_civita(3,o,p,q)(2,1,1)");
582 test_for_zero(levi_civita(3, o, p, q)(2, 1, 2),
583 "levi_civita(3,o,p,q)(2,1,2)");
584 test_for_zero(levi_civita(3, o, p, q)(2, 1, 3),
585 "levi_civita(3,o,p,q)(2,1,3)");
586 test_for_zero(levi_civita(3, o, p, q)(2, 2, 0),
587 "levi_civita(3,o,p,q)(2,2,0)");
588 test_for_zero(levi_civita(3, o, p, q)(2, 2, 1),
589 "levi_civita(3,o,p,q)(2,2,1)");
590 test_for_zero(levi_civita(3, o, p, q)(2, 2, 2),
591 "levi_civita(3,o,p,q)(2,2,2)");
592 test_for_zero(levi_civita(3, o, p, q)(2, 2, 3),
593 "levi_civita(3,o,p,q)(2,2,3)");
594 test_for_zero(levi_civita(3, o, p, q)(2, 3, 0),
595 "levi_civita(3,o,p,q)(2,3,0)");
596 test_for_zero(levi_civita(3, o, p, q)(2, 3, 1),
597 "levi_civita(3,o,p,q)(2,3,1)");
598 test_for_zero(levi_civita(3, o, p, q)(2, 3, 2),
599 "levi_civita(3,o,p,q)(2,3,2)");
600 test_for_zero(levi_civita(3, o, p, q)(2, 3, 3),
601 "levi_civita(3,o,p,q)(2,3,3)");
602 test_for_zero(levi_civita(3, o, p, q)(3, 0, 0),
603 "levi_civita(3,o,p,q)(3,0,0)");
604 test_for_zero(levi_civita(3, o, p, q)(3, 0, 1),
605 "levi_civita(3,o,p,q)(3,0,1)");
606 test_for_zero(levi_civita(3, o, p, q)(3, 0, 2),
607 "levi_civita(3,o,p,q)(3,0,2)");
608 test_for_zero(levi_civita(3, o, p, q)(3, 0, 3),
609 "levi_civita(3,o,p,q)(3,0,3)");
610 test_for_zero(levi_civita(3, o, p, q)(3, 1, 0),
611 "levi_civita(3,o,p,q)(3,1,0)");
612 test_for_zero(levi_civita(3, o, p, q)(3, 1, 1),
613 "levi_civita(3,o,p,q)(3,1,1)");
614 test_for_zero(levi_civita(3, o, p, q)(3, 1, 2),
615 "levi_civita(3,o,p,q)(3,1,2)");
616 test_for_zero(levi_civita(3, o, p, q)(3, 1, 3),
617 "levi_civita(3,o,p,q)(3,1,3)");
618 test_for_zero(levi_civita(3, o, p, q)(3, 2, 0),
619 "levi_civita(3,o,p,q)(3,2,0)");
620 test_for_zero(levi_civita(3, o, p, q)(3, 2, 1),
621 "levi_civita(3,o,p,q)(3,2,1)");
622 test_for_zero(levi_civita(3, o, p, q)(3, 2, 2),
623 "levi_civita(3,o,p,q)(3,2,2)");
624 test_for_zero(levi_civita(3, o, p, q)(3, 2, 3),
625 "levi_civita(3,o,p,q)(3,2,3)");
626 test_for_zero(levi_civita(3, o, p, q)(3, 3, 0),
627 "levi_civita(3,o,p,q)(3,3,0)");
628 test_for_zero(levi_civita(3, o, p, q)(3, 3, 1),
629 "levi_civita(3,o,p,q)(3,3,1)");
630 test_for_zero(levi_civita(3, o, p, q)(3, 3, 2),
631 "levi_civita(3,o,p,q)(3,3,2)");
632 test_for_zero(levi_civita(3, o, p, q)(3, 3, 3),
633 "levi_civita(3,o,p,q)(3,3,3)");
634
635 test_for_zero(levi_civita(n, 0, p, q)(0, 0, 0),
636 "levi_civita(n,0,p,q)(0,0,0)");
637 test_for_zero(levi_civita(n, 0, p, q)(0, 0, 1),
638 "levi_civita(n,0,p,q)(0,0,1)");
639 test_for_zero(levi_civita(n, 0, p, q)(0, 0, 2),
640 "levi_civita(n,0,p,q)(0,0,2)");
641 test_for_zero(levi_civita(n, 0, p, q)(0, 0, 3),
642 "levi_civita(n,0,p,q)(0,0,3)");
643 test_for_zero(levi_civita(n, 0, p, q)(0, 1, 0),
644 "levi_civita(n,0,p,q)(0,1,0)");
645 test_for_zero(levi_civita(n, 0, p, q)(0, 1, 1),
646 "levi_civita(n,0,p,q)(0,1,1)");
647 test_for_zero(levi_civita(n, 0, p, q)(0, 1, 2),
648 "levi_civita(n,0,p,q)(0,1,2)");
649 test_for_zero(levi_civita(n, 0, p, q)(0, 1, 3),
650 "levi_civita(n,0,p,q)(0,1,3)");
651 test_for_zero(levi_civita(n, 0, p, q)(0, 2, 0),
652 "levi_civita(n,0,p,q)(0,2,0)");
653 test_for_zero(levi_civita(n, 0, p, q)(0, 2, 1),
654 "levi_civita(n,0,p,q)(0,2,1)");
655 test_for_zero(levi_civita(n, 0, p, q)(0, 2, 2),
656 "levi_civita(n,0,p,q)(0,2,2)");
657 test_for_zero(levi_civita(n, 0, p, q)(0, 2, 3),
658 "levi_civita(n,0,p,q)(0,2,3)");
659 test_for_zero(levi_civita(n, 0, p, q)(0, 3, 0),
660 "levi_civita(n,0,p,q)(0,3,0)");
661 test_for_zero(levi_civita(n, 0, p, q)(0, 3, 1),
662 "levi_civita(n,0,p,q)(0,3,1)");
663 test_for_zero(levi_civita(n, 0, p, q)(0, 3, 2),
664 "levi_civita(n,0,p,q)(0,3,2)");
665 test_for_zero(levi_civita(n, 0, p, q)(0, 3, 3),
666 "levi_civita(n,0,p,q)(0,3,3)");
667 test_for_zero(levi_civita(n, 0, p, q)(1, 0, 0),
668 "levi_civita(n,0,p,q)(1,0,0)");
669 test_for_zero(levi_civita(n, 0, p, q)(1, 0, 1),
670 "levi_civita(n,0,p,q)(1,0,1)");
671 test_for_zero(levi_civita(n, 0, p, q)(1, 0, 2),
672 "levi_civita(n,0,p,q)(1,0,2)");
673 test_for_zero(levi_civita(n, 0, p, q)(1, 0, 3),
674 "levi_civita(n,0,p,q)(1,0,3)");
675 test_for_zero(levi_civita(n, 0, p, q)(1, 1, 0),
676 "levi_civita(n,0,p,q)(1,1,0)");
677 test_for_zero(levi_civita(n, 0, p, q)(1, 1, 1),
678 "levi_civita(n,0,p,q)(1,1,1)");
679 test_for_zero(levi_civita(n, 0, p, q)(1, 1, 2),
680 "levi_civita(n,0,p,q)(1,1,2)");
681 test_for_zero(levi_civita(n, 0, p, q)(1, 1, 3),
682 "levi_civita(n,0,p,q)(1,1,3)");
683 test_for_zero(levi_civita(n, 0, p, q)(1, 2, 0),
684 "levi_civita(n,0,p,q)(1,2,0)");
685 test_for_zero(levi_civita(n, 0, p, q)(1, 2, 1),
686 "levi_civita(n,0,p,q)(1,2,1)");
687 test_for_zero(levi_civita(n, 0, p, q)(1, 2, 2),
688 "levi_civita(n,0,p,q)(1,2,2)");
689 test_for_zero(levi_civita(n, 0, p, q)(1, 2, 3) + 1,
690 "levi_civita(n,0,p,q)(1,2,3)");
691 test_for_zero(levi_civita(n, 0, p, q)(1, 3, 0),
692 "levi_civita(n,0,p,q)(1,3,0)");
693 test_for_zero(levi_civita(n, 0, p, q)(1, 3, 1),
694 "levi_civita(n,0,p,q)(1,3,1)");
695 test_for_zero(levi_civita(n, 0, p, q)(1, 3, 2) - 1,
696 "levi_civita(n,0,p,q)(1,3,2)");
697 test_for_zero(levi_civita(n, 0, p, q)(1, 3, 3),
698 "levi_civita(n,0,p,q)(1,3,3)");
699 test_for_zero(levi_civita(n, 0, p, q)(2, 0, 0),
700 "levi_civita(n,0,p,q)(2,0,0)");
701 test_for_zero(levi_civita(n, 0, p, q)(2, 0, 1),
702 "levi_civita(n,0,p,q)(2,0,1)");
703 test_for_zero(levi_civita(n, 0, p, q)(2, 0, 2),
704 "levi_civita(n,0,p,q)(2,0,2)");
705 test_for_zero(levi_civita(n, 0, p, q)(2, 0, 3),
706 "levi_civita(n,0,p,q)(2,0,3)");
707 test_for_zero(levi_civita(n, 0, p, q)(2, 1, 0),
708 "levi_civita(n,0,p,q)(2,1,0)");
709 test_for_zero(levi_civita(n, 0, p, q)(2, 1, 1),
710 "levi_civita(n,0,p,q)(2,1,1)");
711 test_for_zero(levi_civita(n, 0, p, q)(2, 1, 2),
712 "levi_civita(n,0,p,q)(2,1,2)");
713 test_for_zero(levi_civita(n, 0, p, q)(2, 1, 3) - 1,
714 "levi_civita(n,0,p,q)(2,1,3)");
715 test_for_zero(levi_civita(n, 0, p, q)(2, 2, 0),
716 "levi_civita(n,0,p,q)(2,2,0)");
717 test_for_zero(levi_civita(n, 0, p, q)(2, 2, 1),
718 "levi_civita(n,0,p,q)(2,2,1)");
719 test_for_zero(levi_civita(n, 0, p, q)(2, 2, 2),
720 "levi_civita(n,0,p,q)(2,2,2)");
721 test_for_zero(levi_civita(n, 0, p, q)(2, 2, 3),
722 "levi_civita(n,0,p,q)(2,2,3)");
723 test_for_zero(levi_civita(n, 0, p, q)(2, 3, 0),
724 "levi_civita(n,0,p,q)(2,3,0)");
725 test_for_zero(levi_civita(n, 0, p, q)(2, 3, 1) + 1,
726 "levi_civita(n,0,p,q)(2,3,1)");
727 test_for_zero(levi_civita(n, 0, p, q)(2, 3, 2),
728 "levi_civita(n,0,p,q)(2,3,2)");
729 test_for_zero(levi_civita(n, 0, p, q)(2, 3, 3),
730 "levi_civita(n,0,p,q)(2,3,3)");
731 test_for_zero(levi_civita(n, 0, p, q)(3, 0, 0),
732 "levi_civita(n,0,p,q)(3,0,0)");
733 test_for_zero(levi_civita(n, 0, p, q)(3, 0, 1),
734 "levi_civita(n,0,p,q)(3,0,1)");
735 test_for_zero(levi_civita(n, 0, p, q)(3, 0, 2),
736 "levi_civita(n,0,p,q)(3,0,2)");
737 test_for_zero(levi_civita(n, 0, p, q)(3, 0, 3),
738 "levi_civita(n,0,p,q)(3,0,3)");
739 test_for_zero(levi_civita(n, 0, p, q)(3, 1, 0),
740 "levi_civita(n,0,p,q)(3,1,0)");
741 test_for_zero(levi_civita(n, 0, p, q)(3, 1, 1),
742 "levi_civita(n,0,p,q)(3,1,1)");
743 test_for_zero(levi_civita(n, 0, p, q)(3, 1, 2) + 1,
744 "levi_civita(n,0,p,q)(3,1,2)");
745 test_for_zero(levi_civita(n, 0, p, q)(3, 1, 3),
746 "levi_civita(n,0,p,q)(3,1,3)");
747 test_for_zero(levi_civita(n, 0, p, q)(3, 2, 0),
748 "levi_civita(n,0,p,q)(3,2,0)");
749 test_for_zero(levi_civita(n, 0, p, q)(3, 2, 1) - 1,
750 "levi_civita(n,0,p,q)(3,2,1)");
751 test_for_zero(levi_civita(n, 0, p, q)(3, 2, 2),
752 "levi_civita(n,0,p,q)(3,2,2)");
753 test_for_zero(levi_civita(n, 0, p, q)(3, 2, 3),
754 "levi_civita(n,0,p,q)(3,2,3)");
755 test_for_zero(levi_civita(n, 0, p, q)(3, 3, 0),
756 "levi_civita(n,0,p,q)(3,3,0)");
757 test_for_zero(levi_civita(n, 0, p, q)(3, 3, 1),
758 "levi_civita(n,0,p,q)(3,3,1)");
759 test_for_zero(levi_civita(n, 0, p, q)(3, 3, 2),
760 "levi_civita(n,0,p,q)(3,3,2)");
761 test_for_zero(levi_civita(n, 0, p, q)(3, 3, 3),
762 "levi_civita(n,0,p,q)(3,3,3)");
763
764 test_for_zero(levi_civita(n, 1, p, q)(0, 0, 0),
765 "levi_civita(n,1,p,q)(0,0,0)");
766 test_for_zero(levi_civita(n, 1, p, q)(0, 0, 1),
767 "levi_civita(n,1,p,q)(0,0,1)");
768 test_for_zero(levi_civita(n, 1, p, q)(0, 0, 2),
769 "levi_civita(n,1,p,q)(0,0,2)");
770 test_for_zero(levi_civita(n, 1, p, q)(0, 0, 3),
771 "levi_civita(n,1,p,q)(0,0,3)");
772 test_for_zero(levi_civita(n, 1, p, q)(0, 1, 0),
773 "levi_civita(n,1,p,q)(0,1,0)");
774 test_for_zero(levi_civita(n, 1, p, q)(0, 1, 1),
775 "levi_civita(n,1,p,q)(0,1,1)");
776 test_for_zero(levi_civita(n, 1, p, q)(0, 1, 2),
777 "levi_civita(n,1,p,q)(0,1,2)");
778 test_for_zero(levi_civita(n, 1, p, q)(0, 1, 3),
779 "levi_civita(n,1,p,q)(0,1,3)");
780 test_for_zero(levi_civita(n, 1, p, q)(0, 2, 0),
781 "levi_civita(n,1,p,q)(0,2,0)");
782 test_for_zero(levi_civita(n, 1, p, q)(0, 2, 1),
783 "levi_civita(n,1,p,q)(0,2,1)");
784 test_for_zero(levi_civita(n, 1, p, q)(0, 2, 2),
785 "levi_civita(n,1,p,q)(0,2,2)");
786 test_for_zero(levi_civita(n, 1, p, q)(0, 2, 3) - 1,
787 "levi_civita(n,1,p,q)(0,2,3)");
788 test_for_zero(levi_civita(n, 1, p, q)(0, 3, 0),
789 "levi_civita(n,1,p,q)(0,3,0)");
790 test_for_zero(levi_civita(n, 1, p, q)(0, 3, 1),
791 "levi_civita(n,1,p,q)(0,3,1)");
792 test_for_zero(levi_civita(n, 1, p, q)(0, 3, 2) + 1,
793 "levi_civita(n,1,p,q)(0,3,2)");
794 test_for_zero(levi_civita(n, 1, p, q)(0, 3, 3),
795 "levi_civita(n,1,p,q)(0,3,3)");
796 test_for_zero(levi_civita(n, 1, p, q)(1, 0, 0),
797 "levi_civita(n,1,p,q)(1,0,0)");
798 test_for_zero(levi_civita(n, 1, p, q)(1, 0, 1),
799 "levi_civita(n,1,p,q)(1,0,1)");
800 test_for_zero(levi_civita(n, 1, p, q)(1, 0, 2),
801 "levi_civita(n,1,p,q)(1,0,2)");
802 test_for_zero(levi_civita(n, 1, p, q)(1, 0, 3),
803 "levi_civita(n,1,p,q)(1,0,3)");
804 test_for_zero(levi_civita(n, 1, p, q)(1, 1, 0),
805 "levi_civita(n,1,p,q)(1,1,0)");
806 test_for_zero(levi_civita(n, 1, p, q)(1, 1, 1),
807 "levi_civita(n,1,p,q)(1,1,1)");
808 test_for_zero(levi_civita(n, 1, p, q)(1, 1, 2),
809 "levi_civita(n,1,p,q)(1,1,2)");
810 test_for_zero(levi_civita(n, 1, p, q)(1, 1, 3),
811 "levi_civita(n,1,p,q)(1,1,3)");
812 test_for_zero(levi_civita(n, 1, p, q)(1, 2, 0),
813 "levi_civita(n,1,p,q)(1,2,0)");
814 test_for_zero(levi_civita(n, 1, p, q)(1, 2, 1),
815 "levi_civita(n,1,p,q)(1,2,1)");
816 test_for_zero(levi_civita(n, 1, p, q)(1, 2, 2),
817 "levi_civita(n,1,p,q)(1,2,2)");
818 test_for_zero(levi_civita(n, 1, p, q)(1, 2, 3),
819 "levi_civita(n,1,p,q)(1,2,3)");
820 test_for_zero(levi_civita(n, 1, p, q)(1, 3, 0),
821 "levi_civita(n,1,p,q)(1,3,0)");
822 test_for_zero(levi_civita(n, 1, p, q)(1, 3, 1),
823 "levi_civita(n,1,p,q)(1,3,1)");
824 test_for_zero(levi_civita(n, 1, p, q)(1, 3, 2),
825 "levi_civita(n,1,p,q)(1,3,2)");
826 test_for_zero(levi_civita(n, 1, p, q)(1, 3, 3),
827 "levi_civita(n,1,p,q)(1,3,3)");
828 test_for_zero(levi_civita(n, 1, p, q)(2, 0, 0),
829 "levi_civita(n,1,p,q)(2,0,0)");
830 test_for_zero(levi_civita(n, 1, p, q)(2, 0, 1),
831 "levi_civita(n,1,p,q)(2,0,1)");
832 test_for_zero(levi_civita(n, 1, p, q)(2, 0, 2),
833 "levi_civita(n,1,p,q)(2,0,2)");
834 test_for_zero(levi_civita(n, 1, p, q)(2, 0, 3) + 1,
835 "levi_civita(n,1,p,q)(2,0,3)");
836 test_for_zero(levi_civita(n, 1, p, q)(2, 1, 0),
837 "levi_civita(n,1,p,q)(2,1,0)");
838 test_for_zero(levi_civita(n, 1, p, q)(2, 1, 1),
839 "levi_civita(n,1,p,q)(2,1,1)");
840 test_for_zero(levi_civita(n, 1, p, q)(2, 1, 2),
841 "levi_civita(n,1,p,q)(2,1,2)");
842 test_for_zero(levi_civita(n, 1, p, q)(2, 1, 3),
843 "levi_civita(n,1,p,q)(2,1,3)");
844 test_for_zero(levi_civita(n, 1, p, q)(2, 2, 0),
845 "levi_civita(n,1,p,q)(2,2,0)");
846 test_for_zero(levi_civita(n, 1, p, q)(2, 2, 1),
847 "levi_civita(n,1,p,q)(2,2,1)");
848 test_for_zero(levi_civita(n, 1, p, q)(2, 2, 2),
849 "levi_civita(n,1,p,q)(2,2,2)");
850 test_for_zero(levi_civita(n, 1, p, q)(2, 2, 3),
851 "levi_civita(n,1,p,q)(2,2,3)");
852 test_for_zero(levi_civita(n, 1, p, q)(2, 3, 0) - 1,
853 "levi_civita(n,1,p,q)(2,3,0)");
854 test_for_zero(levi_civita(n, 1, p, q)(2, 3, 1),
855 "levi_civita(n,1,p,q)(2,3,1)");
856 test_for_zero(levi_civita(n, 1, p, q)(2, 3, 2),
857 "levi_civita(n,1,p,q)(2,3,2)");
858 test_for_zero(levi_civita(n, 1, p, q)(2, 3, 3),
859 "levi_civita(n,1,p,q)(2,3,3)");
860 test_for_zero(levi_civita(n, 1, p, q)(3, 0, 0),
861 "levi_civita(n,1,p,q)(3,0,0)");
862 test_for_zero(levi_civita(n, 1, p, q)(3, 0, 1),
863 "levi_civita(n,1,p,q)(3,0,1)");
864 test_for_zero(levi_civita(n, 1, p, q)(3, 0, 2) - 1,
865 "levi_civita(n,1,p,q)(3,0,2)");
866 test_for_zero(levi_civita(n, 1, p, q)(3, 0, 3),
867 "levi_civita(n,1,p,q)(3,0,3)");
868 test_for_zero(levi_civita(n, 1, p, q)(3, 1, 0),
869 "levi_civita(n,1,p,q)(3,1,0)");
870 test_for_zero(levi_civita(n, 1, p, q)(3, 1, 1),
871 "levi_civita(n,1,p,q)(3,1,1)");
872 test_for_zero(levi_civita(n, 1, p, q)(3, 1, 2),
873 "levi_civita(n,1,p,q)(3,1,2)");
874 test_for_zero(levi_civita(n, 1, p, q)(3, 1, 3),
875 "levi_civita(n,1,p,q)(3,1,3)");
876 test_for_zero(levi_civita(n, 1, p, q)(3, 2, 0) + 1,
877 "levi_civita(n,1,p,q)(3,2,0)");
878 test_for_zero(levi_civita(n, 1, p, q)(3, 2, 1),
879 "levi_civita(n,1,p,q)(3,2,1)");
880 test_for_zero(levi_civita(n, 1, p, q)(3, 2, 2),
881 "levi_civita(n,1,p,q)(3,2,2)");
882 test_for_zero(levi_civita(n, 1, p, q)(3, 2, 3),
883 "levi_civita(n,1,p,q)(3,2,3)");
884 test_for_zero(levi_civita(n, 1, p, q)(3, 3, 0),
885 "levi_civita(n,1,p,q)(3,3,0)");
886 test_for_zero(levi_civita(n, 1, p, q)(3, 3, 1),
887 "levi_civita(n,1,p,q)(3,3,1)");
888 test_for_zero(levi_civita(n, 1, p, q)(3, 3, 2),
889 "levi_civita(n,1,p,q)(3,3,2)");
890 test_for_zero(levi_civita(n, 1, p, q)(3, 3, 3),
891 "levi_civita(n,1,p,q)(3,3,3)");
892
893 test_for_zero(levi_civita(n, 2, p, q)(0, 0, 0),
894 "levi_civita(n,2,p,q)(0,0,0)");
895 test_for_zero(levi_civita(n, 2, p, q)(0, 0, 1),
896 "levi_civita(n,2,p,q)(0,0,1)");
897 test_for_zero(levi_civita(n, 2, p, q)(0, 0, 2),
898 "levi_civita(n,2,p,q)(0,0,2)");
899 test_for_zero(levi_civita(n, 2, p, q)(0, 0, 3),
900 "levi_civita(n,2,p,q)(0,0,3)");
901 test_for_zero(levi_civita(n, 2, p, q)(0, 1, 0),
902 "levi_civita(n,2,p,q)(0,1,0)");
903 test_for_zero(levi_civita(n, 2, p, q)(0, 1, 1),
904 "levi_civita(n,2,p,q)(0,1,1)");
905 test_for_zero(levi_civita(n, 2, p, q)(0, 1, 2),
906 "levi_civita(n,2,p,q)(0,1,2)");
907 test_for_zero(levi_civita(n, 2, p, q)(0, 1, 3) + 1,
908 "levi_civita(n,2,p,q)(0,1,3)");
909 test_for_zero(levi_civita(n, 2, p, q)(0, 2, 0),
910 "levi_civita(n,2,p,q)(0,2,0)");
911 test_for_zero(levi_civita(n, 2, p, q)(0, 2, 1),
912 "levi_civita(n,2,p,q)(0,2,1)");
913 test_for_zero(levi_civita(n, 2, p, q)(0, 2, 2),
914 "levi_civita(n,2,p,q)(0,2,2)");
915 test_for_zero(levi_civita(n, 2, p, q)(0, 3, 3),
916 "levi_civita(n,2,p,q)(0,2,3)");
917 test_for_zero(levi_civita(n, 2, p, q)(0, 3, 0),
918 "levi_civita(n,2,p,q)(0,3,0)");
919 test_for_zero(levi_civita(n, 2, p, q)(0, 3, 1) - 1,
920 "levi_civita(n,2,p,q)(0,3,1)");
921 test_for_zero(levi_civita(n, 2, p, q)(0, 3, 2),
922 "levi_civita(n,2,p,q)(0,3,2)");
923 test_for_zero(levi_civita(n, 2, p, q)(0, 3, 3),
924 "levi_civita(n,2,p,q)(0,3,3)");
925 test_for_zero(levi_civita(n, 2, p, q)(1, 0, 0),
926 "levi_civita(n,2,p,q)(1,0,0)");
927 test_for_zero(levi_civita(n, 2, p, q)(1, 0, 1),
928 "levi_civita(n,2,p,q)(1,0,1)");
929 test_for_zero(levi_civita(n, 2, p, q)(1, 0, 2),
930 "levi_civita(n,2,p,q)(1,0,2)");
931 test_for_zero(levi_civita(n, 2, p, q)(1, 0, 3) - 1,
932 "levi_civita(n,2,p,q)(1,0,3)");
933 test_for_zero(levi_civita(n, 2, p, q)(1, 1, 0),
934 "levi_civita(n,2,p,q)(1,1,0)");
935 test_for_zero(levi_civita(n, 2, p, q)(1, 1, 1),
936 "levi_civita(n,2,p,q)(1,1,1)");
937 test_for_zero(levi_civita(n, 2, p, q)(1, 1, 2),
938 "levi_civita(n,2,p,q)(1,1,2)");
939 test_for_zero(levi_civita(n, 2, p, q)(1, 1, 3),
940 "levi_civita(n,2,p,q)(1,1,3)");
941 test_for_zero(levi_civita(n, 2, p, q)(1, 2, 0),
942 "levi_civita(n,2,p,q)(1,2,0)");
943 test_for_zero(levi_civita(n, 2, p, q)(1, 2, 1),
944 "levi_civita(n,2,p,q)(1,2,1)");
945 test_for_zero(levi_civita(n, 2, p, q)(1, 2, 2),
946 "levi_civita(n,2,p,q)(1,2,2)");
947 test_for_zero(levi_civita(n, 2, p, q)(1, 2, 3),
948 "levi_civita(n,2,p,q)(1,2,3)");
949 test_for_zero(levi_civita(n, 2, p, q)(1, 3, 0) + 1,
950 "levi_civita(n,2,p,q)(1,3,0)");
951 test_for_zero(levi_civita(n, 2, p, q)(1, 3, 1),
952 "levi_civita(n,2,p,q)(1,3,1)");
953 test_for_zero(levi_civita(n, 2, p, q)(1, 3, 2),
954 "levi_civita(n,2,p,q)(1,3,2)");
955 test_for_zero(levi_civita(n, 2, p, q)(1, 3, 3),
956 "levi_civita(n,2,p,q)(1,3,3)");
957 test_for_zero(levi_civita(n, 2, p, q)(2, 0, 0),
958 "levi_civita(n,2,p,q)(2,0,0)");
959 test_for_zero(levi_civita(n, 2, p, q)(2, 0, 1),
960 "levi_civita(n,2,p,q)(2,0,1)");
961 test_for_zero(levi_civita(n, 2, p, q)(2, 0, 2),
962 "levi_civita(n,2,p,q)(2,0,2)");
963 test_for_zero(levi_civita(n, 2, p, q)(2, 0, 3),
964 "levi_civita(n,2,p,q)(2,0,3)");
965 test_for_zero(levi_civita(n, 2, p, q)(2, 1, 0),
966 "levi_civita(n,2,p,q)(2,1,0)");
967 test_for_zero(levi_civita(n, 2, p, q)(2, 1, 1),
968 "levi_civita(n,2,p,q)(2,1,1)");
969 test_for_zero(levi_civita(n, 2, p, q)(2, 1, 2),
970 "levi_civita(n,2,p,q)(2,1,2)");
971 test_for_zero(levi_civita(n, 2, p, q)(2, 1, 3),
972 "levi_civita(n,2,p,q)(2,1,3)");
973 test_for_zero(levi_civita(n, 2, p, q)(2, 2, 0),
974 "levi_civita(n,2,p,q)(2,2,0)");
975 test_for_zero(levi_civita(n, 2, p, q)(2, 2, 1),
976 "levi_civita(n,2,p,q)(2,2,1)");
977 test_for_zero(levi_civita(n, 2, p, q)(2, 2, 2),
978 "levi_civita(n,2,p,q)(2,2,2)");
979 test_for_zero(levi_civita(n, 2, p, q)(2, 2, 3),
980 "levi_civita(n,2,p,q)(2,2,3)");
981 test_for_zero(levi_civita(n, 2, p, q)(2, 3, 0),
982 "levi_civita(n,2,p,q)(2,3,0)");
983 test_for_zero(levi_civita(n, 2, p, q)(2, 3, 1),
984 "levi_civita(n,2,p,q)(2,3,1)");
985 test_for_zero(levi_civita(n, 2, p, q)(2, 3, 2),
986 "levi_civita(n,2,p,q)(2,3,2)");
987 test_for_zero(levi_civita(n, 2, p, q)(2, 3, 3),
988 "levi_civita(n,2,p,q)(2,3,3)");
989 test_for_zero(levi_civita(n, 2, p, q)(3, 0, 0),
990 "levi_civita(n,2,p,q)(3,0,0)");
991 test_for_zero(levi_civita(n, 2, p, q)(3, 0, 1) + 1,
992 "levi_civita(n,2,p,q)(3,0,1)");
993 test_for_zero(levi_civita(n, 2, p, q)(3, 0, 2),
994 "levi_civita(n,2,p,q)(3,0,2)");
995 test_for_zero(levi_civita(n, 2, p, q)(3, 0, 3),
996 "levi_civita(n,2,p,q)(3,0,3)");
997 test_for_zero(levi_civita(n, 2, p, q)(3, 1, 0) - 1,
998 "levi_civita(n,2,p,q)(3,1,0)");
999 test_for_zero(levi_civita(n, 2, p, q)(3, 1, 1),
1000 "levi_civita(n,2,p,q)(3,1,1)");
1001 test_for_zero(levi_civita(n, 2, p, q)(3, 1, 2),
1002 "levi_civita(n,2,p,q)(3,1,2)");
1003 test_for_zero(levi_civita(n, 2, p, q)(3, 1, 3),
1004 "levi_civita(n,2,p,q)(3,1,3)");
1005 test_for_zero(levi_civita(n, 2, p, q)(3, 2, 0),
1006 "levi_civita(n,2,p,q)(3,2,0)");
1007 test_for_zero(levi_civita(n, 2, p, q)(3, 2, 1),
1008 "levi_civita(n,2,p,q)(3,2,1)");
1009 test_for_zero(levi_civita(n, 2, p, q)(3, 2, 2),
1010 "levi_civita(n,2,p,q)(3,2,2)");
1011 test_for_zero(levi_civita(n, 2, p, q)(3, 2, 3),
1012 "levi_civita(n,2,p,q)(3,2,3)");
1013 test_for_zero(levi_civita(n, 2, p, q)(3, 3, 0),
1014 "levi_civita(n,2,p,q)(3,3,0)");
1015 test_for_zero(levi_civita(n, 2, p, q)(3, 3, 1),
1016 "levi_civita(n,2,p,q)(3,3,1)");
1017 test_for_zero(levi_civita(n, 2, p, q)(3, 3, 2),
1018 "levi_civita(n,2,p,q)(3,3,2)");
1019 test_for_zero(levi_civita(n, 2, p, q)(3, 3, 3),
1020 "levi_civita(n,2,p,q)(3,3,3)");
1021
1022 test_for_zero(levi_civita(n, 3, p, q)(0, 0, 0),
1023 "levi_civita(n,3,p,q)(0,0,0)");
1024 test_for_zero(levi_civita(n, 3, p, q)(0, 0, 1),
1025 "levi_civita(n,3,p,q)(0,0,1)");
1026 test_for_zero(levi_civita(n, 3, p, q)(0, 0, 2),
1027 "levi_civita(n,3,p,q)(0,0,2)");
1028 test_for_zero(levi_civita(n, 3, p, q)(0, 0, 3),
1029 "levi_civita(n,3,p,q)(0,0,3)");
1030 test_for_zero(levi_civita(n, 3, p, q)(0, 1, 0),
1031 "levi_civita(n,3,p,q)(0,1,0)");
1032 test_for_zero(levi_civita(n, 3, p, q)(0, 1, 1),
1033 "levi_civita(n,3,p,q)(0,1,1)");
1034 test_for_zero(levi_civita(n, 3, p, q)(0, 1, 2) - 1,
1035 "levi_civita(n,3,p,q)(0,1,2)");
1036 test_for_zero(levi_civita(n, 3, p, q)(0, 1, 3),
1037 "levi_civita(n,3,p,q)(0,1,3)");
1038 test_for_zero(levi_civita(n, 3, p, q)(0, 2, 0),
1039 "levi_civita(n,3,p,q)(0,2,0)");
1040 test_for_zero(levi_civita(n, 3, p, q)(0, 2, 1) + 1,
1041 "levi_civita(n,3,p,q)(0,2,1)");
1042 test_for_zero(levi_civita(n, 3, p, q)(0, 2, 2),
1043 "levi_civita(n,3,p,q)(0,2,2)");
1044 test_for_zero(levi_civita(n, 3, p, q)(0, 2, 3),
1045 "levi_civita(n,3,p,q)(0,2,3)");
1046 test_for_zero(levi_civita(n, 3, p, q)(0, 3, 0),
1047 "levi_civita(n,3,p,q)(0,3,0)");
1048 test_for_zero(levi_civita(n, 3, p, q)(0, 3, 1),
1049 "levi_civita(n,3,p,q)(0,3,1)");
1050 test_for_zero(levi_civita(n, 3, p, q)(0, 3, 2),
1051 "levi_civita(n,3,p,q)(0,3,2)");
1052 test_for_zero(levi_civita(n, 3, p, q)(0, 3, 3),
1053 "levi_civita(n,3,p,q)(0,3,3)");
1054 test_for_zero(levi_civita(n, 3, p, q)(1, 0, 0),
1055 "levi_civita(n,3,p,q)(1,0,0)");
1056 test_for_zero(levi_civita(n, 3, p, q)(1, 0, 1),
1057 "levi_civita(n,3,p,q)(1,0,1)");
1058 test_for_zero(levi_civita(n, 3, p, q)(1, 0, 2) + 1,
1059 "levi_civita(n,3,p,q)(1,0,2)");
1060 test_for_zero(levi_civita(n, 3, p, q)(1, 0, 3),
1061 "levi_civita(n,3,p,q)(1,0,3)");
1062 test_for_zero(levi_civita(n, 3, p, q)(1, 1, 0),
1063 "levi_civita(n,3,p,q)(1,1,0)");
1064 test_for_zero(levi_civita(n, 3, p, q)(1, 1, 1),
1065 "levi_civita(n,3,p,q)(1,1,1)");
1066 test_for_zero(levi_civita(n, 3, p, q)(1, 1, 2),
1067 "levi_civita(n,3,p,q)(1,1,2)");
1068 test_for_zero(levi_civita(n, 3, p, q)(1, 1, 3),
1069 "levi_civita(n,3,p,q)(1,1,3)");
1070 test_for_zero(levi_civita(n, 3, p, q)(1, 2, 0) - 1,
1071 "levi_civita(n,3,p,q)(1,2,0)");
1072 test_for_zero(levi_civita(n, 3, p, q)(1, 2, 1),
1073 "levi_civita(n,3,p,q)(1,2,1)");
1074 test_for_zero(levi_civita(n, 3, p, q)(1, 2, 2),
1075 "levi_civita(n,3,p,q)(1,2,2)");
1076 test_for_zero(levi_civita(n, 3, p, q)(1, 2, 3),
1077 "levi_civita(n,3,p,q)(1,2,3)");
1078 test_for_zero(levi_civita(n, 3, p, q)(1, 3, 0),
1079 "levi_civita(n,3,p,q)(1,3,0)");
1080 test_for_zero(levi_civita(n, 3, p, q)(1, 3, 1),
1081 "levi_civita(n,3,p,q)(1,3,1)");
1082 test_for_zero(levi_civita(n, 3, p, q)(1, 3, 2),
1083 "levi_civita(n,3,p,q)(1,3,2)");
1084 test_for_zero(levi_civita(n, 3, p, q)(1, 3, 3),
1085 "levi_civita(n,3,p,q)(1,3,3)");
1086 test_for_zero(levi_civita(n, 3, p, q)(2, 0, 0),
1087 "levi_civita(n,3,p,q)(2,0,0)");
1088 test_for_zero(levi_civita(n, 3, p, q)(2, 0, 1) - 1,
1089 "levi_civita(n,3,p,q)(2,0,1)");
1090 test_for_zero(levi_civita(n, 3, p, q)(2, 0, 2),
1091 "levi_civita(n,3,p,q)(2,0,2)");
1092 test_for_zero(levi_civita(n, 3, p, q)(2, 0, 3),
1093 "levi_civita(n,3,p,q)(2,0,3)");
1094 test_for_zero(levi_civita(n, 3, p, q)(2, 1, 0) + 1,
1095 "levi_civita(n,3,p,q)(2,1,0)");
1096 test_for_zero(levi_civita(n, 3, p, q)(2, 1, 1),
1097 "levi_civita(n,3,p,q)(2,1,1)");
1098 test_for_zero(levi_civita(n, 3, p, q)(2, 1, 2),
1099 "levi_civita(n,3,p,q)(2,1,2)");
1100 test_for_zero(levi_civita(n, 3, p, q)(2, 1, 3),
1101 "levi_civita(n,3,p,q)(2,1,3)");
1102 test_for_zero(levi_civita(n, 3, p, q)(2, 2, 0),
1103 "levi_civita(n,3,p,q)(2,2,0)");
1104 test_for_zero(levi_civita(n, 3, p, q)(2, 2, 1),
1105 "levi_civita(n,3,p,q)(2,2,1)");
1106 test_for_zero(levi_civita(n, 3, p, q)(2, 2, 2),
1107 "levi_civita(n,3,p,q)(2,2,2)");
1108 test_for_zero(levi_civita(n, 3, p, q)(2, 2, 3),
1109 "levi_civita(n,3,p,q)(2,2,3)");
1110 test_for_zero(levi_civita(n, 3, p, q)(2, 3, 0),
1111 "levi_civita(n,3,p,q)(2,3,0)");
1112 test_for_zero(levi_civita(n, 3, p, q)(2, 3, 1),
1113 "levi_civita(n,3,p,q)(2,3,1)");
1114 test_for_zero(levi_civita(n, 3, p, q)(2, 3, 2),
1115 "levi_civita(n,3,p,q)(2,3,2)");
1116 test_for_zero(levi_civita(n, 3, p, q)(2, 3, 3),
1117 "levi_civita(n,3,p,q)(2,3,3)");
1118 test_for_zero(levi_civita(n, 3, p, q)(3, 0, 0),
1119 "levi_civita(n,3,p,q)(3,0,0)");
1120 test_for_zero(levi_civita(n, 3, p, q)(3, 0, 1),
1121 "levi_civita(n,3,p,q)(3,0,1)");
1122 test_for_zero(levi_civita(n, 3, p, q)(3, 0, 2),
1123 "levi_civita(n,3,p,q)(3,0,2)");
1124 test_for_zero(levi_civita(n, 3, p, q)(3, 0, 3),
1125 "levi_civita(n,3,p,q)(3,0,3)");
1126 test_for_zero(levi_civita(n, 3, p, q)(3, 1, 0),
1127 "levi_civita(n,3,p,q)(3,1,0)");
1128 test_for_zero(levi_civita(n, 3, p, q)(3, 1, 1),
1129 "levi_civita(n,3,p,q)(3,1,1)");
1130 test_for_zero(levi_civita(n, 3, p, q)(3, 1, 2),
1131 "levi_civita(n,3,p,q)(3,1,2)");
1132 test_for_zero(levi_civita(n, 3, p, q)(3, 1, 3),
1133 "levi_civita(n,3,p,q)(3,1,3)");
1134 test_for_zero(levi_civita(n, 3, p, q)(3, 2, 0),
1135 "levi_civita(n,3,p,q)(3,2,0)");
1136 test_for_zero(levi_civita(n, 3, p, q)(3, 2, 1),
1137 "levi_civita(n,3,p,q)(3,2,1)");
1138 test_for_zero(levi_civita(n, 3, p, q)(3, 2, 2),
1139 "levi_civita(n,3,p,q)(3,2,2)");
1140 test_for_zero(levi_civita(n, 3, p, q)(3, 2, 3),
1141 "levi_civita(n,3,p,q)(3,2,3)");
1142 test_for_zero(levi_civita(n, 3, p, q)(3, 3, 0),
1143 "levi_civita(n,3,p,q)(3,3,0)");
1144 test_for_zero(levi_civita(n, 3, p, q)(3, 3, 1),
1145 "levi_civita(n,3,p,q)(3,3,1)");
1146 test_for_zero(levi_civita(n, 3, p, q)(3, 3, 2),
1147 "levi_civita(n,3,p,q)(3,3,2)");
1148 test_for_zero(levi_civita(n, 3, p, q)(3, 3, 3),
1149 "levi_civita(n,3,p,q)(3,3,3)");
1150
1151 test_for_zero(levi_civita(n, o, 0, q)(0, 0, 0),
1152 "levi_civita(n,o,0,q)(0,0,0)");
1153 test_for_zero(levi_civita(n, o, 0, q)(0, 0, 1),
1154 "levi_civita(n,o,0,q)(0,0,1)");
1155 test_for_zero(levi_civita(n, o, 0, q)(0, 0, 2),
1156 "levi_civita(n,o,0,q)(0,0,2)");
1157 test_for_zero(levi_civita(n, o, 0, q)(0, 0, 3),
1158 "levi_civita(n,o,0,q)(0,0,3)");
1159 test_for_zero(levi_civita(n, o, 0, q)(0, 1, 0),
1160 "levi_civita(n,o,0,q)(0,1,0)");
1161 test_for_zero(levi_civita(n, o, 0, q)(0, 1, 1),
1162 "levi_civita(n,o,0,q)(0,1,1)");
1163 test_for_zero(levi_civita(n, o, 0, q)(0, 1, 2),
1164 "levi_civita(n,o,0,q)(0,1,2)");
1165 test_for_zero(levi_civita(n, o, 0, q)(0, 1, 3),
1166 "levi_civita(n,o,0,q)(0,1,3)");
1167 test_for_zero(levi_civita(n, o, 0, q)(0, 2, 0),
1168 "levi_civita(n,o,0,q)(0,2,0)");
1169 test_for_zero(levi_civita(n, o, 0, q)(0, 2, 1),
1170 "levi_civita(n,o,0,q)(0,2,1)");
1171 test_for_zero(levi_civita(n, o, 0, q)(0, 2, 2),
1172 "levi_civita(n,o,0,q)(0,2,2)");
1173 test_for_zero(levi_civita(n, o, 0, q)(0, 2, 3),
1174 "levi_civita(n,o,0,q)(0,2,3)");
1175 test_for_zero(levi_civita(n, o, 0, q)(0, 3, 0),
1176 "levi_civita(n,o,0,q)(0,3,0)");
1177 test_for_zero(levi_civita(n, o, 0, q)(0, 3, 1),
1178 "levi_civita(n,o,0,q)(0,3,1)");
1179 test_for_zero(levi_civita(n, o, 0, q)(0, 3, 2),
1180 "levi_civita(n,o,0,q)(0,3,2)");
1181 test_for_zero(levi_civita(n, o, 0, q)(0, 3, 3),
1182 "levi_civita(n,o,0,q)(0,3,3)");
1183 test_for_zero(levi_civita(n, o, 0, q)(1, 0, 0),
1184 "levi_civita(n,o,0,q)(1,0,0)");
1185 test_for_zero(levi_civita(n, o, 0, q)(1, 0, 1),
1186 "levi_civita(n,o,0,q)(1,0,1)");
1187 test_for_zero(levi_civita(n, o, 0, q)(1, 0, 2),
1188 "levi_civita(n,o,0,q)(1,0,2)");
1189 test_for_zero(levi_civita(n, o, 0, q)(1, 0, 3),
1190 "levi_civita(n,o,0,q)(1,0,3)");
1191 test_for_zero(levi_civita(n, o, 0, q)(1, 1, 0),
1192 "levi_civita(n,o,0,q)(1,1,0)");
1193 test_for_zero(levi_civita(n, o, 0, q)(1, 1, 1),
1194 "levi_civita(n,o,0,q)(1,1,1)");
1195 test_for_zero(levi_civita(n, o, 0, q)(1, 1, 2),
1196 "levi_civita(n,o,0,q)(1,1,2)");
1197 test_for_zero(levi_civita(n, o, 0, q)(1, 1, 3),
1198 "levi_civita(n,o,0,q)(1,1,3)");
1199 test_for_zero(levi_civita(n, o, 0, q)(1, 2, 0),
1200 "levi_civita(n,o,0,q)(1,2,0)");
1201 test_for_zero(levi_civita(n, o, 0, q)(1, 2, 1),
1202 "levi_civita(n,o,0,q)(1,2,1)");
1203 test_for_zero(levi_civita(n, o, 0, q)(1, 2, 2),
1204 "levi_civita(n,o,0,q)(1,2,2)");
1205 test_for_zero(levi_civita(n, o, 0, q)(1, 2, 3) - 1,
1206 "levi_civita(n,o,0,q)(1,2,3)");
1207 test_for_zero(levi_civita(n, o, 0, q)(1, 3, 0),
1208 "levi_civita(n,o,0,q)(1,3,0)");
1209 test_for_zero(levi_civita(n, o, 0, q)(1, 3, 1),
1210 "levi_civita(n,o,0,q)(1,3,1)");
1211 test_for_zero(levi_civita(n, o, 0, q)(1, 3, 2) + 1,
1212 "levi_civita(n,o,0,q)(1,3,2)");
1213 test_for_zero(levi_civita(n, o, 0, q)(1, 3, 3),
1214 "levi_civita(n,o,0,q)(1,3,3)");
1215 test_for_zero(levi_civita(n, o, 0, q)(2, 0, 0),
1216 "levi_civita(n,o,0,q)(2,0,0)");
1217 test_for_zero(levi_civita(n, o, 0, q)(2, 0, 1),
1218 "levi_civita(n,o,0,q)(2,0,1)");
1219 test_for_zero(levi_civita(n, o, 0, q)(2, 0, 2),
1220 "levi_civita(n,o,0,q)(2,0,2)");
1221 test_for_zero(levi_civita(n, o, 0, q)(2, 0, 3),
1222 "levi_civita(n,o,0,q)(2,0,3)");
1223 test_for_zero(levi_civita(n, o, 0, q)(2, 1, 0),
1224 "levi_civita(n,o,0,q)(2,1,0)");
1225 test_for_zero(levi_civita(n, o, 0, q)(2, 1, 1),
1226 "levi_civita(n,o,0,q)(2,1,1)");
1227 test_for_zero(levi_civita(n, o, 0, q)(2, 1, 2),
1228 "levi_civita(n,o,0,q)(2,1,2)");
1229 test_for_zero(levi_civita(n, o, 0, q)(2, 1, 3) + 1,
1230 "levi_civita(n,o,0,q)(2,1,3)");
1231 test_for_zero(levi_civita(n, o, 0, q)(2, 2, 0),
1232 "levi_civita(n,o,0,q)(2,2,0)");
1233 test_for_zero(levi_civita(n, o, 0, q)(2, 2, 1),
1234 "levi_civita(n,o,0,q)(2,2,1)");
1235 test_for_zero(levi_civita(n, o, 0, q)(2, 2, 2),
1236 "levi_civita(n,o,0,q)(2,2,2)");
1237 test_for_zero(levi_civita(n, o, 0, q)(2, 2, 3),
1238 "levi_civita(n,o,0,q)(2,2,3)");
1239 test_for_zero(levi_civita(n, o, 0, q)(2, 3, 0),
1240 "levi_civita(n,o,0,q)(2,3,0)");
1241 test_for_zero(levi_civita(n, o, 0, q)(2, 3, 1) - 1,
1242 "levi_civita(n,o,0,q)(2,3,1)");
1243 test_for_zero(levi_civita(n, o, 0, q)(2, 3, 2),
1244 "levi_civita(n,o,0,q)(2,3,2)");
1245 test_for_zero(levi_civita(n, o, 0, q)(2, 3, 3),
1246 "levi_civita(n,o,0,q)(2,3,3)");
1247 test_for_zero(levi_civita(n, o, 0, q)(3, 0, 0),
1248 "levi_civita(n,o,0,q)(3,0,0)");
1249 test_for_zero(levi_civita(n, o, 0, q)(3, 0, 1),
1250 "levi_civita(n,o,0,q)(3,0,1)");
1251 test_for_zero(levi_civita(n, o, 0, q)(3, 0, 2),
1252 "levi_civita(n,o,0,q)(3,0,2)");
1253 test_for_zero(levi_civita(n, o, 0, q)(3, 0, 3),
1254 "levi_civita(n,o,0,q)(3,0,3)");
1255 test_for_zero(levi_civita(n, o, 0, q)(3, 1, 0),
1256 "levi_civita(n,o,0,q)(3,1,0)");
1257 test_for_zero(levi_civita(n, o, 0, q)(3, 1, 1),
1258 "levi_civita(n,o,0,q)(3,1,1)");
1259 test_for_zero(levi_civita(n, o, 0, q)(3, 1, 2) - 1,
1260 "levi_civita(n,o,0,q)(3,1,2)");
1261 test_for_zero(levi_civita(n, o, 0, q)(3, 1, 3),
1262 "levi_civita(n,o,0,q)(3,1,3)");
1263 test_for_zero(levi_civita(n, o, 0, q)(3, 2, 0),
1264 "levi_civita(n,o,0,q)(3,2,0)");
1265 test_for_zero(levi_civita(n, o, 0, q)(3, 2, 1) + 1,
1266 "levi_civita(n,o,0,q)(3,2,1)");
1267 test_for_zero(levi_civita(n, o, 0, q)(3, 2, 2),
1268 "levi_civita(n,o,0,q)(3,2,2)");
1269 test_for_zero(levi_civita(n, o, 0, q)(3, 2, 3),
1270 "levi_civita(n,o,0,q)(3,2,3)");
1271 test_for_zero(levi_civita(n, o, 0, q)(3, 3, 0),
1272 "levi_civita(n,o,0,q)(3,3,0)");
1273 test_for_zero(levi_civita(n, o, 0, q)(3, 3, 1),
1274 "levi_civita(n,o,0,q)(3,3,1)");
1275 test_for_zero(levi_civita(n, o, 0, q)(3, 3, 2),
1276 "levi_civita(n,o,0,q)(3,3,2)");
1277 test_for_zero(levi_civita(n, o, 0, q)(3, 3, 3),
1278 "levi_civita(n,o,0,q)(3,3,3)");
1279
1280 test_for_zero(levi_civita(n, o, 1, q)(0, 0, 0),
1281 "levi_civita(n,o,1,q)(0,0,0)");
1282 test_for_zero(levi_civita(n, o, 1, q)(0, 0, 1),
1283 "levi_civita(n,o,1,q)(0,0,1)");
1284 test_for_zero(levi_civita(n, o, 1, q)(0, 0, 2),
1285 "levi_civita(n,o,1,q)(0,0,2)");
1286 test_for_zero(levi_civita(n, o, 1, q)(0, 0, 3),
1287 "levi_civita(n,o,1,q)(0,0,3)");
1288 test_for_zero(levi_civita(n, o, 1, q)(0, 1, 0),
1289 "levi_civita(n,o,1,q)(0,1,0)");
1290 test_for_zero(levi_civita(n, o, 1, q)(0, 1, 1),
1291 "levi_civita(n,o,1,q)(0,1,1)");
1292 test_for_zero(levi_civita(n, o, 1, q)(0, 1, 2),
1293 "levi_civita(n,o,1,q)(0,1,2)");
1294 test_for_zero(levi_civita(n, o, 1, q)(0, 1, 3),
1295 "levi_civita(n,o,1,q)(0,1,3)");
1296 test_for_zero(levi_civita(n, o, 1, q)(0, 2, 0),
1297 "levi_civita(n,o,1,q)(0,2,0)");
1298 test_for_zero(levi_civita(n, o, 1, q)(0, 2, 1),
1299 "levi_civita(n,o,1,q)(0,2,1)");
1300 test_for_zero(levi_civita(n, o, 1, q)(0, 2, 2),
1301 "levi_civita(n,o,1,q)(0,2,2)");
1302 test_for_zero(levi_civita(n, o, 1, q)(0, 2, 3) + 1,
1303 "levi_civita(n,o,1,q)(0,2,3)");
1304 test_for_zero(levi_civita(n, o, 1, q)(0, 3, 0),
1305 "levi_civita(n,o,1,q)(0,3,0)");
1306 test_for_zero(levi_civita(n, o, 1, q)(0, 3, 1),
1307 "levi_civita(n,o,1,q)(0,3,1)");
1308 test_for_zero(levi_civita(n, o, 1, q)(0, 3, 2) - 1,
1309 "levi_civita(n,o,1,q)(0,3,2)");
1310 test_for_zero(levi_civita(n, o, 1, q)(0, 3, 3),
1311 "levi_civita(n,o,1,q)(0,3,3)");
1312 test_for_zero(levi_civita(n, o, 1, q)(1, 0, 0),
1313 "levi_civita(n,o,1,q)(1,0,0)");
1314 test_for_zero(levi_civita(n, o, 1, q)(1, 0, 1),
1315 "levi_civita(n,o,1,q)(1,0,1)");
1316 test_for_zero(levi_civita(n, o, 1, q)(1, 0, 2),
1317 "levi_civita(n,o,1,q)(1,0,2)");
1318 test_for_zero(levi_civita(n, o, 1, q)(1, 0, 3),
1319 "levi_civita(n,o,1,q)(1,0,3)");
1320 test_for_zero(levi_civita(n, o, 1, q)(1, 1, 0),
1321 "levi_civita(n,o,1,q)(1,1,0)");
1322 test_for_zero(levi_civita(n, o, 1, q)(1, 1, 1),
1323 "levi_civita(n,o,1,q)(1,1,1)");
1324 test_for_zero(levi_civita(n, o, 1, q)(1, 1, 2),
1325 "levi_civita(n,o,1,q)(1,1,2)");
1326 test_for_zero(levi_civita(n, o, 1, q)(1, 1, 3),
1327 "levi_civita(n,o,1,q)(1,1,3)");
1328 test_for_zero(levi_civita(n, o, 1, q)(1, 2, 0),
1329 "levi_civita(n,o,1,q)(1,2,0)");
1330 test_for_zero(levi_civita(n, o, 1, q)(1, 2, 1),
1331 "levi_civita(n,o,1,q)(1,2,1)");
1332 test_for_zero(levi_civita(n, o, 1, q)(1, 2, 2),
1333 "levi_civita(n,o,1,q)(1,2,2)");
1334 test_for_zero(levi_civita(n, o, 1, q)(1, 2, 3),
1335 "levi_civita(n,o,1,q)(1,2,3)");
1336 test_for_zero(levi_civita(n, o, 1, q)(1, 3, 0),
1337 "levi_civita(n,o,1,q)(1,3,0)");
1338 test_for_zero(levi_civita(n, o, 1, q)(1, 3, 1),
1339 "levi_civita(n,o,1,q)(1,3,1)");
1340 test_for_zero(levi_civita(n, o, 1, q)(1, 3, 2),
1341 "levi_civita(n,o,1,q)(1,3,2)");
1342 test_for_zero(levi_civita(n, o, 1, q)(1, 3, 3),
1343 "levi_civita(n,o,1,q)(1,3,3)");
1344 test_for_zero(levi_civita(n, o, 1, q)(2, 0, 0),
1345 "levi_civita(n,o,1,q)(2,0,0)");
1346 test_for_zero(levi_civita(n, o, 1, q)(2, 0, 1),
1347 "levi_civita(n,o,1,q)(2,0,1)");
1348 test_for_zero(levi_civita(n, o, 1, q)(2, 0, 2),
1349 "levi_civita(n,o,1,q)(2,0,2)");
1350 test_for_zero(levi_civita(n, o, 1, q)(2, 0, 3) - 1,
1351 "levi_civita(n,o,1,q)(2,0,3)");
1352 test_for_zero(levi_civita(n, o, 1, q)(2, 1, 0),
1353 "levi_civita(n,o,1,q)(2,1,0)");
1354 test_for_zero(levi_civita(n, o, 1, q)(2, 1, 1),
1355 "levi_civita(n,o,1,q)(2,1,1)");
1356 test_for_zero(levi_civita(n, o, 1, q)(2, 1, 2),
1357 "levi_civita(n,o,1,q)(2,1,2)");
1358 test_for_zero(levi_civita(n, o, 1, q)(2, 1, 3),
1359 "levi_civita(n,o,1,q)(2,1,3)");
1360 test_for_zero(levi_civita(n, o, 1, q)(2, 2, 0),
1361 "levi_civita(n,o,1,q)(2,2,0)");
1362 test_for_zero(levi_civita(n, o, 1, q)(2, 2, 1),
1363 "levi_civita(n,o,1,q)(2,2,1)");
1364 test_for_zero(levi_civita(n, o, 1, q)(2, 2, 2),
1365 "levi_civita(n,o,1,q)(2,2,2)");
1366 test_for_zero(levi_civita(n, o, 1, q)(2, 2, 3),
1367 "levi_civita(n,o,1,q)(2,2,3)");
1368 test_for_zero(levi_civita(n, o, 1, q)(2, 3, 0) + 1,
1369 "levi_civita(n,o,1,q)(2,3,0)");
1370 test_for_zero(levi_civita(n, o, 1, q)(2, 3, 1),
1371 "levi_civita(n,o,1,q)(2,3,1)");
1372 test_for_zero(levi_civita(n, o, 1, q)(2, 3, 2),
1373 "levi_civita(n,o,1,q)(2,3,2)");
1374 test_for_zero(levi_civita(n, o, 1, q)(2, 3, 3),
1375 "levi_civita(n,o,1,q)(2,3,3)");
1376 test_for_zero(levi_civita(n, o, 1, q)(3, 0, 0),
1377 "levi_civita(n,o,1,q)(3,0,0)");
1378 test_for_zero(levi_civita(n, o, 1, q)(3, 0, 1),
1379 "levi_civita(n,o,1,q)(3,0,1)");
1380 test_for_zero(levi_civita(n, o, 1, q)(3, 0, 2) + 1,
1381 "levi_civita(n,o,1,q)(3,0,2)");
1382 test_for_zero(levi_civita(n, o, 1, q)(3, 0, 3),
1383 "levi_civita(n,o,1,q)(3,0,3)");
1384 test_for_zero(levi_civita(n, o, 1, q)(3, 1, 0),
1385 "levi_civita(n,o,1,q)(3,1,0)");
1386 test_for_zero(levi_civita(n, o, 1, q)(3, 1, 1),
1387 "levi_civita(n,o,1,q)(3,1,1)");
1388 test_for_zero(levi_civita(n, o, 1, q)(3, 1, 2),
1389 "levi_civita(n,o,1,q)(3,1,2)");
1390 test_for_zero(levi_civita(n, o, 1, q)(3, 1, 3),
1391 "levi_civita(n,o,1,q)(3,1,3)");
1392 test_for_zero(levi_civita(n, o, 1, q)(3, 2, 0) - 1,
1393 "levi_civita(n,o,1,q)(3,2,0)");
1394 test_for_zero(levi_civita(n, o, 1, q)(3, 2, 1),
1395 "levi_civita(n,o,1,q)(3,2,1)");
1396 test_for_zero(levi_civita(n, o, 1, q)(3, 2, 2),
1397 "levi_civita(n,o,1,q)(3,2,2)");
1398 test_for_zero(levi_civita(n, o, 1, q)(3, 2, 3),
1399 "levi_civita(n,o,1,q)(3,2,3)");
1400 test_for_zero(levi_civita(n, o, 1, q)(3, 3, 0),
1401 "levi_civita(n,o,1,q)(3,3,0)");
1402 test_for_zero(levi_civita(n, o, 1, q)(3, 3, 1),
1403 "levi_civita(n,o,1,q)(3,3,1)");
1404 test_for_zero(levi_civita(n, o, 1, q)(3, 3, 2),
1405 "levi_civita(n,o,1,q)(3,3,2)");
1406 test_for_zero(levi_civita(n, o, 1, q)(3, 3, 3),
1407 "levi_civita(n,o,1,q)(3,3,3)");
1408
1409 test_for_zero(levi_civita(n, o, 2, q)(0, 0, 0),
1410 "levi_civita(n,o,2,q)(0,0,0)");
1411 test_for_zero(levi_civita(n, o, 2, q)(0, 0, 1),
1412 "levi_civita(n,o,2,q)(0,0,1)");
1413 test_for_zero(levi_civita(n, o, 2, q)(0, 0, 2),
1414 "levi_civita(n,o,2,q)(0,0,2)");
1415 test_for_zero(levi_civita(n, o, 2, q)(0, 0, 3),
1416 "levi_civita(n,o,2,q)(0,0,3)");
1417 test_for_zero(levi_civita(n, o, 2, q)(0, 1, 0),
1418 "levi_civita(n,o,2,q)(0,1,0)");
1419 test_for_zero(levi_civita(n, o, 2, q)(0, 1, 1),
1420 "levi_civita(n,o,2,q)(0,1,1)");
1421 test_for_zero(levi_civita(n, o, 2, q)(0, 1, 2),
1422 "levi_civita(n,o,2,q)(0,1,2)");
1423 test_for_zero(levi_civita(n, o, 2, q)(0, 1, 3) - 1,
1424 "levi_civita(n,o,2,q)(0,1,3)");
1425 test_for_zero(levi_civita(n, o, 2, q)(0, 2, 0),
1426 "levi_civita(n,o,2,q)(0,2,0)");
1427 test_for_zero(levi_civita(n, o, 2, q)(0, 2, 1),
1428 "levi_civita(n,o,2,q)(0,2,1)");
1429 test_for_zero(levi_civita(n, o, 2, q)(0, 2, 2),
1430 "levi_civita(n,o,2,q)(0,2,2)");
1431 test_for_zero(levi_civita(n, o, 2, q)(0, 2, 3),
1432 "levi_civita(n,o,2,q)(0,2,3)");
1433 test_for_zero(levi_civita(n, o, 2, q)(0, 3, 0),
1434 "levi_civita(n,o,2,q)(0,3,0)");
1435 test_for_zero(levi_civita(n, o, 2, q)(0, 3, 1) + 1,
1436 "levi_civita(n,o,2,q)(0,3,1)");
1437 test_for_zero(levi_civita(n, o, 2, q)(0, 3, 2),
1438 "levi_civita(n,o,2,q)(0,3,2)");
1439 test_for_zero(levi_civita(n, o, 2, q)(0, 3, 3),
1440 "levi_civita(n,o,2,q)(0,3,3)");
1441 test_for_zero(levi_civita(n, o, 2, q)(1, 0, 0),
1442 "levi_civita(n,o,2,q)(1,0,0)");
1443 test_for_zero(levi_civita(n, o, 2, q)(1, 0, 1),
1444 "levi_civita(n,o,2,q)(1,0,1)");
1445 test_for_zero(levi_civita(n, o, 2, q)(1, 0, 2),
1446 "levi_civita(n,o,2,q)(1,0,2)");
1447 test_for_zero(levi_civita(n, o, 2, q)(1, 0, 3) + 1,
1448 "levi_civita(n,o,2,q)(1,0,3)");
1449 test_for_zero(levi_civita(n, o, 2, q)(1, 1, 0),
1450 "levi_civita(n,o,2,q)(1,1,0)");
1451 test_for_zero(levi_civita(n, o, 2, q)(1, 1, 1),
1452 "levi_civita(n,o,2,q)(1,1,1)");
1453 test_for_zero(levi_civita(n, o, 2, q)(1, 1, 2),
1454 "levi_civita(n,o,2,q)(1,1,2)");
1455 test_for_zero(levi_civita(n, o, 2, q)(1, 1, 3),
1456 "levi_civita(n,o,2,q)(1,1,3)");
1457 test_for_zero(levi_civita(n, o, 2, q)(1, 2, 0),
1458 "levi_civita(n,o,2,q)(1,2,0)");
1459 test_for_zero(levi_civita(n, o, 2, q)(1, 2, 1),
1460 "levi_civita(n,o,2,q)(1,2,1)");
1461 test_for_zero(levi_civita(n, o, 2, q)(1, 2, 2),
1462 "levi_civita(n,o,2,q)(1,2,2)");
1463 test_for_zero(levi_civita(n, o, 2, q)(1, 2, 3),
1464 "levi_civita(n,o,2,q)(1,2,3)");
1465 test_for_zero(levi_civita(n, o, 2, q)(1, 3, 0) - 1,
1466 "levi_civita(n,o,2,q)(1,3,0)");
1467 test_for_zero(levi_civita(n, o, 2, q)(1, 3, 1),
1468 "levi_civita(n,o,2,q)(1,3,1)");
1469 test_for_zero(levi_civita(n, o, 2, q)(1, 3, 2),
1470 "levi_civita(n,o,2,q)(1,3,2)");
1471 test_for_zero(levi_civita(n, o, 2, q)(1, 3, 3),
1472 "levi_civita(n,o,2,q)(1,3,3)");
1473 test_for_zero(levi_civita(n, o, 2, q)(2, 0, 0),
1474 "levi_civita(n,o,2,q)(2,0,0)");
1475 test_for_zero(levi_civita(n, o, 2, q)(2, 0, 1),
1476 "levi_civita(n,o,2,q)(2,0,1)");
1477 test_for_zero(levi_civita(n, o, 2, q)(2, 0, 2),
1478 "levi_civita(n,o,2,q)(2,0,2)");
1479 test_for_zero(levi_civita(n, o, 2, q)(2, 0, 3),
1480 "levi_civita(n,o,2,q)(2,0,3)");
1481 test_for_zero(levi_civita(n, o, 2, q)(2, 1, 0),
1482 "levi_civita(n,o,2,q)(2,1,0)");
1483 test_for_zero(levi_civita(n, o, 2, q)(2, 1, 1),
1484 "levi_civita(n,o,2,q)(2,1,1)");
1485 test_for_zero(levi_civita(n, o, 2, q)(2, 1, 2),
1486 "levi_civita(n,o,2,q)(2,1,2)");
1487 test_for_zero(levi_civita(n, o, 2, q)(2, 1, 3),
1488 "levi_civita(n,o,2,q)(2,1,3)");
1489 test_for_zero(levi_civita(n, o, 2, q)(2, 2, 0),
1490 "levi_civita(n,o,2,q)(2,2,0)");
1491 test_for_zero(levi_civita(n, o, 2, q)(2, 2, 1),
1492 "levi_civita(n,o,2,q)(2,2,1)");
1493 test_for_zero(levi_civita(n, o, 2, q)(2, 2, 2),
1494 "levi_civita(n,o,2,q)(2,2,2)");
1495 test_for_zero(levi_civita(n, o, 2, q)(2, 2, 3),
1496 "levi_civita(n,o,2,q)(2,2,3)");
1497 test_for_zero(levi_civita(n, o, 2, q)(2, 3, 0),
1498 "levi_civita(n,o,2,q)(2,3,0)");
1499 test_for_zero(levi_civita(n, o, 2, q)(2, 3, 1),
1500 "levi_civita(n,o,2,q)(2,3,1)");
1501 test_for_zero(levi_civita(n, o, 2, q)(2, 3, 2),
1502 "levi_civita(n,o,2,q)(2,3,2)");
1503 test_for_zero(levi_civita(n, o, 2, q)(2, 3, 3),
1504 "levi_civita(n,o,2,q)(2,3,3)");
1505 test_for_zero(levi_civita(n, o, 2, q)(3, 0, 0),
1506 "levi_civita(n,o,2,q)(3,0,0)");
1507 test_for_zero(levi_civita(n, o, 2, q)(3, 0, 1) - 1,
1508 "levi_civita(n,o,2,q)(3,0,1)");
1509 test_for_zero(levi_civita(n, o, 2, q)(3, 0, 2),
1510 "levi_civita(n,o,2,q)(3,0,2)");
1511 test_for_zero(levi_civita(n, o, 2, q)(3, 0, 3),
1512 "levi_civita(n,o,2,q)(3,0,3)");
1513 test_for_zero(levi_civita(n, o, 2, q)(3, 1, 0) + 1,
1514 "levi_civita(n,o,2,q)(3,1,0)");
1515 test_for_zero(levi_civita(n, o, 2, q)(3, 1, 1),
1516 "levi_civita(n,o,2,q)(3,1,1)");
1517 test_for_zero(levi_civita(n, o, 2, q)(3, 1, 2),
1518 "levi_civita(n,o,2,q)(3,1,2)");
1519 test_for_zero(levi_civita(n, o, 2, q)(3, 1, 3),
1520 "levi_civita(n,o,2,q)(3,1,3)");
1521 test_for_zero(levi_civita(n, o, 2, q)(3, 2, 0),
1522 "levi_civita(n,o,2,q)(3,2,0)");
1523 test_for_zero(levi_civita(n, o, 2, q)(3, 2, 1),
1524 "levi_civita(n,o,2,q)(3,2,1)");
1525 test_for_zero(levi_civita(n, o, 2, q)(3, 2, 2),
1526 "levi_civita(n,o,2,q)(3,2,2)");
1527 test_for_zero(levi_civita(n, o, 2, q)(3, 2, 3),
1528 "levi_civita(n,o,2,q)(3,2,3)");
1529 test_for_zero(levi_civita(n, o, 2, q)(3, 3, 0),
1530 "levi_civita(n,o,2,q)(3,3,0)");
1531 test_for_zero(levi_civita(n, o, 2, q)(3, 3, 1),
1532 "levi_civita(n,o,2,q)(3,3,1)");
1533 test_for_zero(levi_civita(n, o, 2, q)(3, 3, 2),
1534 "levi_civita(n,o,2,q)(3,3,2)");
1535 test_for_zero(levi_civita(n, o, 2, q)(3, 3, 3),
1536 "levi_civita(n,o,2,q)(3,3,3)");
1537
1538 test_for_zero(levi_civita(n, o, 3, q)(0, 0, 0),
1539 "levi_civita(n,o,3,q)(0,0,0)");
1540 test_for_zero(levi_civita(n, o, 3, q)(0, 0, 1),
1541 "levi_civita(n,o,3,q)(0,0,1)");
1542 test_for_zero(levi_civita(n, o, 3, q)(0, 0, 2),
1543 "levi_civita(n,o,3,q)(0,0,2)");
1544 test_for_zero(levi_civita(n, o, 3, q)(0, 0, 3),
1545 "levi_civita(n,o,3,q)(0,0,3)");
1546 test_for_zero(levi_civita(n, o, 3, q)(0, 1, 0),
1547 "levi_civita(n,o,3,q)(0,1,0)");
1548 test_for_zero(levi_civita(n, o, 3, q)(0, 1, 1),
1549 "levi_civita(n,o,3,q)(0,1,1)");
1550 test_for_zero(levi_civita(n, o, 3, q)(0, 1, 2) + 1,
1551 "levi_civita(n,o,3,q)(0,1,2)");
1552 test_for_zero(levi_civita(n, o, 3, q)(0, 1, 3),
1553 "levi_civita(n,o,3,q)(0,1,3)");
1554 test_for_zero(levi_civita(n, o, 3, q)(0, 2, 0),
1555 "levi_civita(n,o,3,q)(0,2,0)");
1556 test_for_zero(levi_civita(n, o, 3, q)(0, 2, 1) - 1,
1557 "levi_civita(n,o,3,q)(0,2,1)");
1558 test_for_zero(levi_civita(n, o, 3, q)(0, 2, 2),
1559 "levi_civita(n,o,3,q)(0,2,2)");
1560 test_for_zero(levi_civita(n, o, 3, q)(0, 2, 3),
1561 "levi_civita(n,o,3,q)(0,2,3)");
1562 test_for_zero(levi_civita(n, o, 3, q)(0, 3, 0),
1563 "levi_civita(n,o,3,q)(0,3,0)");
1564 test_for_zero(levi_civita(n, o, 3, q)(0, 3, 1),
1565 "levi_civita(n,o,3,q)(0,3,1)");
1566 test_for_zero(levi_civita(n, o, 3, q)(0, 3, 2),
1567 "levi_civita(n,o,3,q)(0,3,2)");
1568 test_for_zero(levi_civita(n, o, 3, q)(0, 3, 3),
1569 "levi_civita(n,o,3,q)(0,3,3)");
1570 test_for_zero(levi_civita(n, o, 3, q)(1, 0, 0),
1571 "levi_civita(n,o,3,q)(1,0,0)");
1572 test_for_zero(levi_civita(n, o, 3, q)(1, 0, 1),
1573 "levi_civita(n,o,3,q)(1,0,1)");
1574 test_for_zero(levi_civita(n, o, 3, q)(1, 0, 2) - 1,
1575 "levi_civita(n,o,3,q)(1,0,2)");
1576 test_for_zero(levi_civita(n, o, 3, q)(1, 0, 3),
1577 "levi_civita(n,o,3,q)(1,0,3)");
1578 test_for_zero(levi_civita(n, o, 3, q)(1, 1, 0),
1579 "levi_civita(n,o,3,q)(1,1,0)");
1580 test_for_zero(levi_civita(n, o, 3, q)(1, 1, 1),
1581 "levi_civita(n,o,3,q)(1,1,1)");
1582 test_for_zero(levi_civita(n, o, 3, q)(1, 1, 2),
1583 "levi_civita(n,o,3,q)(1,1,2)");
1584 test_for_zero(levi_civita(n, o, 3, q)(1, 1, 3),
1585 "levi_civita(n,o,3,q)(1,1,3)");
1586 test_for_zero(levi_civita(n, o, 3, q)(1, 2, 0) + 1,
1587 "levi_civita(n,o,3,q)(1,2,0)");
1588 test_for_zero(levi_civita(n, o, 3, q)(1, 2, 1),
1589 "levi_civita(n,o,3,q)(1,2,1)");
1590 test_for_zero(levi_civita(n, o, 3, q)(1, 2, 2),
1591 "levi_civita(n,o,3,q)(1,2,2)");
1592 test_for_zero(levi_civita(n, o, 3, q)(1, 2, 3),
1593 "levi_civita(n,o,3,q)(1,2,3)");
1594 test_for_zero(levi_civita(n, o, 3, q)(1, 3, 0),
1595 "levi_civita(n,o,3,q)(1,3,0)");
1596 test_for_zero(levi_civita(n, o, 3, q)(1, 3, 1),
1597 "levi_civita(n,o,3,q)(1,3,1)");
1598 test_for_zero(levi_civita(n, o, 3, q)(1, 3, 2),
1599 "levi_civita(n,o,3,q)(1,3,2)");
1600 test_for_zero(levi_civita(n, o, 3, q)(1, 3, 3),
1601 "levi_civita(n,o,3,q)(1,3,3)");
1602 test_for_zero(levi_civita(n, o, 3, q)(2, 0, 0),
1603 "levi_civita(n,o,3,q)(2,0,0)");
1604 test_for_zero(levi_civita(n, o, 3, q)(2, 0, 1) + 1,
1605 "levi_civita(n,o,3,q)(2,0,1)");
1606 test_for_zero(levi_civita(n, o, 3, q)(2, 0, 2),
1607 "levi_civita(n,o,3,q)(2,0,2)");
1608 test_for_zero(levi_civita(n, o, 3, q)(2, 0, 3),
1609 "levi_civita(n,o,3,q)(2,0,3)");
1610 test_for_zero(levi_civita(n, o, 3, q)(2, 1, 0) - 1,
1611 "levi_civita(n,o,3,q)(2,1,0)");
1612 test_for_zero(levi_civita(n, o, 3, q)(2, 1, 1),
1613 "levi_civita(n,o,3,q)(2,1,1)");
1614 test_for_zero(levi_civita(n, o, 3, q)(2, 1, 2),
1615 "levi_civita(n,o,3,q)(2,1,2)");
1616 test_for_zero(levi_civita(n, o, 3, q)(2, 1, 3),
1617 "levi_civita(n,o,3,q)(2,1,3)");
1618 test_for_zero(levi_civita(n, o, 3, q)(2, 2, 0),
1619 "levi_civita(n,o,3,q)(2,2,0)");
1620 test_for_zero(levi_civita(n, o, 3, q)(2, 2, 1),
1621 "levi_civita(n,o,3,q)(2,2,1)");
1622 test_for_zero(levi_civita(n, o, 3, q)(2, 2, 2),
1623 "levi_civita(n,o,3,q)(2,2,2)");
1624 test_for_zero(levi_civita(n, o, 3, q)(2, 2, 3),
1625 "levi_civita(n,o,3,q)(2,2,3)");
1626 test_for_zero(levi_civita(n, o, 3, q)(2, 3, 0),
1627 "levi_civita(n,o,3,q)(2,3,0)");
1628 test_for_zero(levi_civita(n, o, 3, q)(2, 3, 1),
1629 "levi_civita(n,o,3,q)(2,3,1)");
1630 test_for_zero(levi_civita(n, o, 3, q)(2, 3, 2),
1631 "levi_civita(n,o,3,q)(2,3,2)");
1632 test_for_zero(levi_civita(n, o, 3, q)(2, 3, 3),
1633 "levi_civita(n,o,3,q)(2,3,3)");
1634 test_for_zero(levi_civita(n, o, 3, q)(3, 0, 0),
1635 "levi_civita(n,o,3,q)(3,0,0)");
1636 test_for_zero(levi_civita(n, o, 3, q)(3, 0, 1),
1637 "levi_civita(n,o,3,q)(3,0,1)");
1638 test_for_zero(levi_civita(n, o, 3, q)(3, 0, 2),
1639 "levi_civita(n,o,3,q)(3,0,2)");
1640 test_for_zero(levi_civita(n, o, 3, q)(3, 0, 3),
1641 "levi_civita(n,o,3,q)(3,0,3)");
1642 test_for_zero(levi_civita(n, o, 3, q)(3, 1, 0),
1643 "levi_civita(n,o,3,q)(3,1,0)");
1644 test_for_zero(levi_civita(n, o, 3, q)(3, 1, 1),
1645 "levi_civita(n,o,3,q)(3,1,1)");
1646 test_for_zero(levi_civita(n, o, 3, q)(3, 1, 2),
1647 "levi_civita(n,o,3,q)(3,1,2)");
1648 test_for_zero(levi_civita(n, o, 3, q)(3, 1, 3),
1649 "levi_civita(n,o,3,q)(3,1,3)");
1650 test_for_zero(levi_civita(n, o, 3, q)(3, 2, 0),
1651 "levi_civita(n,o,3,q)(3,2,0)");
1652 test_for_zero(levi_civita(n, o, 3, q)(3, 2, 1),
1653 "levi_civita(n,o,3,q)(3,2,1)");
1654 test_for_zero(levi_civita(n, o, 3, q)(3, 2, 2),
1655 "levi_civita(n,o,3,q)(3,2,2)");
1656 test_for_zero(levi_civita(n, o, 3, q)(3, 2, 3),
1657 "levi_civita(n,o,3,q)(3,2,3)");
1658 test_for_zero(levi_civita(n, o, 3, q)(3, 3, 0),
1659 "levi_civita(n,o,3,q)(3,3,0)");
1660 test_for_zero(levi_civita(n, o, 3, q)(3, 3, 1),
1661 "levi_civita(n,o,3,q)(3,3,1)");
1662 test_for_zero(levi_civita(n, o, 3, q)(3, 3, 2),
1663 "levi_civita(n,o,3,q)(3,3,2)");
1664 test_for_zero(levi_civita(n, o, 3, q)(3, 3, 3),
1665 "levi_civita(n,o,3,q)(3,3,3)");
1666
1667 test_for_zero(levi_civita(n, o, p, 0)(0, 0, 0),
1668 "levi_civita(n,o,p,0)(0,0,0)");
1669 test_for_zero(levi_civita(n, o, p, 0)(0, 0, 1),
1670 "levi_civita(n,o,p,0)(0,0,1)");
1671 test_for_zero(levi_civita(n, o, p, 0)(0, 0, 2),
1672 "levi_civita(n,o,p,0)(0,0,2)");
1673 test_for_zero(levi_civita(n, o, p, 0)(0, 0, 3),
1674 "levi_civita(n,o,p,0)(0,0,3)");
1675 test_for_zero(levi_civita(n, o, p, 0)(0, 1, 0),
1676 "levi_civita(n,o,p,0)(0,1,0)");
1677 test_for_zero(levi_civita(n, o, p, 0)(0, 1, 1),
1678 "levi_civita(n,o,p,0)(0,1,1)");
1679 test_for_zero(levi_civita(n, o, p, 0)(0, 1, 2),
1680 "levi_civita(n,o,p,0)(0,1,2)");
1681 test_for_zero(levi_civita(n, o, p, 0)(0, 1, 3),
1682 "levi_civita(n,o,p,0)(0,1,3)");
1683 test_for_zero(levi_civita(n, o, p, 0)(0, 2, 0),
1684 "levi_civita(n,o,p,0)(0,2,0)");
1685 test_for_zero(levi_civita(n, o, p, 0)(0, 2, 1),
1686 "levi_civita(n,o,p,0)(0,2,1)");
1687 test_for_zero(levi_civita(n, o, p, 0)(0, 2, 2),
1688 "levi_civita(n,o,p,0)(0,2,2)");
1689 test_for_zero(levi_civita(n, o, p, 0)(0, 2, 3),
1690 "levi_civita(n,o,p,0)(0,2,3)");
1691 test_for_zero(levi_civita(n, o, p, 0)(0, 3, 0),
1692 "levi_civita(n,o,p,0)(0,3,0)");
1693 test_for_zero(levi_civita(n, o, p, 0)(0, 3, 1),
1694 "levi_civita(n,o,p,0)(0,3,1)");
1695 test_for_zero(levi_civita(n, o, p, 0)(0, 3, 2),
1696 "levi_civita(n,o,p,0)(0,3,2)");
1697 test_for_zero(levi_civita(n, o, p, 0)(0, 3, 3),
1698 "levi_civita(n,o,p,0)(0,3,3)");
1699 test_for_zero(levi_civita(n, o, p, 0)(1, 0, 0),
1700 "levi_civita(n,o,p,0)(1,0,0)");
1701 test_for_zero(levi_civita(n, o, p, 0)(1, 0, 1),
1702 "levi_civita(n,o,p,0)(1,0,1)");
1703 test_for_zero(levi_civita(n, o, p, 0)(1, 0, 2),
1704 "levi_civita(n,o,p,0)(1,0,2)");
1705 test_for_zero(levi_civita(n, o, p, 0)(1, 0, 3),
1706 "levi_civita(n,o,p,0)(1,0,3)");
1707 test_for_zero(levi_civita(n, o, p, 0)(1, 1, 0),
1708 "levi_civita(n,o,p,0)(1,1,0)");
1709 test_for_zero(levi_civita(n, o, p, 0)(1, 1, 1),
1710 "levi_civita(n,o,p,0)(1,1,1)");
1711 test_for_zero(levi_civita(n, o, p, 0)(1, 1, 2),
1712 "levi_civita(n,o,p,0)(1,1,2)");
1713 test_for_zero(levi_civita(n, o, p, 0)(1, 1, 3),
1714 "levi_civita(n,o,p,0)(1,1,3)");
1715 test_for_zero(levi_civita(n, o, p, 0)(1, 2, 0),
1716 "levi_civita(n,o,p,0)(1,2,0)");
1717 test_for_zero(levi_civita(n, o, p, 0)(1, 2, 1),
1718 "levi_civita(n,o,p,0)(1,2,1)");
1719 test_for_zero(levi_civita(n, o, p, 0)(1, 2, 2),
1720 "levi_civita(n,o,p,0)(1,2,2)");
1721 test_for_zero(levi_civita(n, o, p, 0)(1, 2, 3) + 1,
1722 "levi_civita(n,o,p,0)(1,2,3)");
1723 test_for_zero(levi_civita(n, o, p, 0)(1, 3, 0),
1724 "levi_civita(n,o,p,0)(1,3,0)");
1725 test_for_zero(levi_civita(n, o, p, 0)(1, 3, 1),
1726 "levi_civita(n,o,p,0)(1,3,1)");
1727 test_for_zero(levi_civita(n, o, p, 0)(1, 3, 2) - 1,
1728 "levi_civita(n,o,p,0)(1,3,2)");
1729 test_for_zero(levi_civita(n, o, p, 0)(1, 3, 3),
1730 "levi_civita(n,o,p,0)(1,3,3)");
1731 test_for_zero(levi_civita(n, o, p, 0)(2, 0, 0),
1732 "levi_civita(n,o,p,0)(2,0,0)");
1733 test_for_zero(levi_civita(n, o, p, 0)(2, 0, 1),
1734 "levi_civita(n,o,p,0)(2,0,1)");
1735 test_for_zero(levi_civita(n, o, p, 0)(2, 0, 2),
1736 "levi_civita(n,o,p,0)(2,0,2)");
1737 test_for_zero(levi_civita(n, o, p, 0)(2, 0, 3),
1738 "levi_civita(n,o,p,0)(2,0,3)");
1739 test_for_zero(levi_civita(n, o, p, 0)(2, 1, 0),
1740 "levi_civita(n,o,p,0)(2,1,0)");
1741 test_for_zero(levi_civita(n, o, p, 0)(2, 1, 1),
1742 "levi_civita(n,o,p,0)(2,1,1)");
1743 test_for_zero(levi_civita(n, o, p, 0)(2, 1, 2),
1744 "levi_civita(n,o,p,0)(2,1,2)");
1745 test_for_zero(levi_civita(n, o, p, 0)(2, 1, 3) - 1,
1746 "levi_civita(n,o,p,0)(2,1,3)");
1747 test_for_zero(levi_civita(n, o, p, 0)(2, 2, 0),
1748 "levi_civita(n,o,p,0)(2,2,0)");
1749 test_for_zero(levi_civita(n, o, p, 0)(2, 2, 1),
1750 "levi_civita(n,o,p,0)(2,2,1)");
1751 test_for_zero(levi_civita(n, o, p, 0)(2, 2, 2),
1752 "levi_civita(n,o,p,0)(2,2,2)");
1753 test_for_zero(levi_civita(n, o, p, 0)(2, 2, 3),
1754 "levi_civita(n,o,p,0)(2,2,3)");
1755 test_for_zero(levi_civita(n, o, p, 0)(2, 3, 0),
1756 "levi_civita(n,o,p,0)(2,3,0)");
1757 test_for_zero(levi_civita(n, o, p, 0)(2, 3, 1) + 1,
1758 "levi_civita(n,o,p,0)(2,3,1)");
1759 test_for_zero(levi_civita(n, o, p, 0)(2, 3, 2),
1760 "levi_civita(n,o,p,0)(2,3,2)");
1761 test_for_zero(levi_civita(n, o, p, 0)(2, 3, 3),
1762 "levi_civita(n,o,p,0)(2,3,3)");
1763 test_for_zero(levi_civita(n, o, p, 0)(3, 0, 0),
1764 "levi_civita(n,o,p,0)(3,0,0)");
1765 test_for_zero(levi_civita(n, o, p, 0)(3, 0, 1),
1766 "levi_civita(n,o,p,0)(3,0,1)");
1767 test_for_zero(levi_civita(n, o, p, 0)(3, 0, 2),
1768 "levi_civita(n,o,p,0)(3,0,2)");
1769 test_for_zero(levi_civita(n, o, p, 0)(3, 0, 3),
1770 "levi_civita(n,o,p,0)(3,0,3)");
1771 test_for_zero(levi_civita(n, o, p, 0)(3, 1, 0),
1772 "levi_civita(n,o,p,0)(3,1,0)");
1773 test_for_zero(levi_civita(n, o, p, 0)(3, 1, 1),
1774 "levi_civita(n,o,p,0)(3,1,1)");
1775 test_for_zero(levi_civita(n, o, p, 0)(3, 1, 2) + 1,
1776 "levi_civita(n,o,p,0)(3,1,2)");
1777 test_for_zero(levi_civita(n, o, p, 0)(3, 1, 3),
1778 "levi_civita(n,o,p,0)(3,1,3)");
1779 test_for_zero(levi_civita(n, o, p, 0)(3, 2, 0),
1780 "levi_civita(n,o,p,0)(3,2,0)");
1781 test_for_zero(levi_civita(n, o, p, 0)(3, 2, 1) - 1,
1782 "levi_civita(n,o,p,0)(3,2,1)");
1783 test_for_zero(levi_civita(n, o, p, 0)(3, 2, 2),
1784 "levi_civita(n,o,p,0)(3,2,2)");
1785 test_for_zero(levi_civita(n, o, p, 0)(3, 2, 3),
1786 "levi_civita(n,o,p,0)(3,2,3)");
1787 test_for_zero(levi_civita(n, o, p, 0)(3, 3, 0),
1788 "levi_civita(n,o,p,0)(3,3,0)");
1789 test_for_zero(levi_civita(n, o, p, 0)(3, 3, 1),
1790 "levi_civita(n,o,p,0)(3,3,1)");
1791 test_for_zero(levi_civita(n, o, p, 0)(3, 3, 2),
1792 "levi_civita(n,o,p,0)(3,3,2)");
1793 test_for_zero(levi_civita(n, o, p, 0)(3, 3, 3),
1794 "levi_civita(n,o,p,0)(3,3,3)");
1795
1796 test_for_zero(levi_civita(n, o, p, 1)(0, 0, 0),
1797 "levi_civita(n,o,p,1)(0,0,0)");
1798 test_for_zero(levi_civita(n, o, p, 1)(0, 0, 1),
1799 "levi_civita(n,o,p,1)(0,0,1)");
1800 test_for_zero(levi_civita(n, o, p, 1)(0, 0, 2),
1801 "levi_civita(n,o,p,1)(0,0,2)");
1802 test_for_zero(levi_civita(n, o, p, 1)(0, 0, 3),
1803 "levi_civita(n,o,p,1)(0,0,3)");
1804 test_for_zero(levi_civita(n, o, p, 1)(0, 1, 0),
1805 "levi_civita(n,o,p,1)(0,1,0)");
1806 test_for_zero(levi_civita(n, o, p, 1)(0, 1, 1),
1807 "levi_civita(n,o,p,1)(0,1,1)");
1808 test_for_zero(levi_civita(n, o, p, 1)(0, 1, 2),
1809 "levi_civita(n,o,p,1)(0,1,2)");
1810 test_for_zero(levi_civita(n, o, p, 1)(0, 1, 3),
1811 "levi_civita(n,o,p,1)(0,1,3)");
1812 test_for_zero(levi_civita(n, o, p, 1)(0, 2, 0),
1813 "levi_civita(n,o,p,1)(0,2,0)");
1814 test_for_zero(levi_civita(n, o, p, 1)(0, 2, 1),
1815 "levi_civita(n,o,p,1)(0,2,1)");
1816 test_for_zero(levi_civita(n, o, p, 1)(0, 2, 2),
1817 "levi_civita(n,o,p,1)(0,2,2)");
1818 test_for_zero(levi_civita(n, o, p, 1)(0, 2, 3) - 1,
1819 "levi_civita(n,o,p,1)(0,2,3)");
1820 test_for_zero(levi_civita(n, o, p, 1)(0, 3, 0),
1821 "levi_civita(n,o,p,1)(0,3,0)");
1822 test_for_zero(levi_civita(n, o, p, 1)(0, 3, 1),
1823 "levi_civita(n,o,p,1)(0,3,1)");
1824 test_for_zero(levi_civita(n, o, p, 1)(0, 3, 2) + 1,
1825 "levi_civita(n,o,p,1)(0,3,2)");
1826 test_for_zero(levi_civita(n, o, p, 1)(0, 3, 3),
1827 "levi_civita(n,o,p,1)(0,3,3)");
1828 test_for_zero(levi_civita(n, o, p, 1)(1, 0, 0),
1829 "levi_civita(n,o,p,1)(1,0,0)");
1830 test_for_zero(levi_civita(n, o, p, 1)(1, 0, 1),
1831 "levi_civita(n,o,p,1)(1,0,1)");
1832 test_for_zero(levi_civita(n, o, p, 1)(1, 0, 2),
1833 "levi_civita(n,o,p,1)(1,0,2)");
1834 test_for_zero(levi_civita(n, o, p, 1)(1, 0, 3),
1835 "levi_civita(n,o,p,1)(1,0,3)");
1836 test_for_zero(levi_civita(n, o, p, 1)(1, 1, 0),
1837 "levi_civita(n,o,p,1)(1,1,0)");
1838 test_for_zero(levi_civita(n, o, p, 1)(1, 1, 1),
1839 "levi_civita(n,o,p,1)(1,1,1)");
1840 test_for_zero(levi_civita(n, o, p, 1)(1, 1, 2),
1841 "levi_civita(n,o,p,1)(1,1,2)");
1842 test_for_zero(levi_civita(n, o, p, 1)(1, 1, 3),
1843 "levi_civita(n,o,p,1)(1,1,3)");
1844 test_for_zero(levi_civita(n, o, p, 1)(1, 2, 0),
1845 "levi_civita(n,o,p,1)(1,2,0)");
1846 test_for_zero(levi_civita(n, o, p, 1)(1, 2, 1),
1847 "levi_civita(n,o,p,1)(1,2,1)");
1848 test_for_zero(levi_civita(n, o, p, 1)(1, 2, 2),
1849 "levi_civita(n,o,p,1)(1,2,2)");
1850 test_for_zero(levi_civita(n, o, p, 1)(1, 2, 3),
1851 "levi_civita(n,o,p,1)(1,2,3)");
1852 test_for_zero(levi_civita(n, o, p, 1)(1, 3, 0),
1853 "levi_civita(n,o,p,1)(1,3,0)");
1854 test_for_zero(levi_civita(n, o, p, 1)(1, 3, 1),
1855 "levi_civita(n,o,p,1)(1,3,1)");
1856 test_for_zero(levi_civita(n, o, p, 1)(1, 3, 2),
1857 "levi_civita(n,o,p,1)(1,3,2)");
1858 test_for_zero(levi_civita(n, o, p, 1)(1, 3, 3),
1859 "levi_civita(n,o,p,1)(1,3,3)");
1860 test_for_zero(levi_civita(n, o, p, 1)(2, 0, 0),
1861 "levi_civita(n,o,p,1)(2,0,0)");
1862 test_for_zero(levi_civita(n, o, p, 1)(2, 0, 1),
1863 "levi_civita(n,o,p,1)(2,0,1)");
1864 test_for_zero(levi_civita(n, o, p, 1)(2, 0, 2),
1865 "levi_civita(n,o,p,1)(2,0,2)");
1866 test_for_zero(levi_civita(n, o, p, 1)(2, 0, 3) + 1,
1867 "levi_civita(n,o,p,1)(2,0,3)");
1868 test_for_zero(levi_civita(n, o, p, 1)(2, 1, 0),
1869 "levi_civita(n,o,p,1)(2,1,0)");
1870 test_for_zero(levi_civita(n, o, p, 1)(2, 1, 1),
1871 "levi_civita(n,o,p,1)(2,1,1)");
1872 test_for_zero(levi_civita(n, o, p, 1)(2, 1, 2),
1873 "levi_civita(n,o,p,1)(2,1,2)");
1874 test_for_zero(levi_civita(n, o, p, 1)(2, 1, 3),
1875 "levi_civita(n,o,p,1)(2,1,3)");
1876 test_for_zero(levi_civita(n, o, p, 1)(2, 2, 0),
1877 "levi_civita(n,o,p,1)(2,2,0)");
1878 test_for_zero(levi_civita(n, o, p, 1)(2, 2, 1),
1879 "levi_civita(n,o,p,1)(2,2,1)");
1880 test_for_zero(levi_civita(n, o, p, 1)(2, 2, 2),
1881 "levi_civita(n,o,p,1)(2,2,2)");
1882 test_for_zero(levi_civita(n, o, p, 1)(2, 2, 3),
1883 "levi_civita(n,o,p,1)(2,2,3)");
1884 test_for_zero(levi_civita(n, o, p, 1)(2, 3, 0) - 1,
1885 "levi_civita(n,o,p,1)(2,3,0)");
1886 test_for_zero(levi_civita(n, o, p, 1)(2, 3, 1),
1887 "levi_civita(n,o,p,1)(2,3,1)");
1888 test_for_zero(levi_civita(n, o, p, 1)(2, 3, 2),
1889 "levi_civita(n,o,p,1)(2,3,2)");
1890 test_for_zero(levi_civita(n, o, p, 1)(2, 3, 3),
1891 "levi_civita(n,o,p,1)(2,3,3)");
1892 test_for_zero(levi_civita(n, o, p, 1)(3, 0, 0),
1893 "levi_civita(n,o,p,1)(3,0,0)");
1894 test_for_zero(levi_civita(n, o, p, 1)(3, 0, 1),
1895 "levi_civita(n,o,p,1)(3,0,1)");
1896 test_for_zero(levi_civita(n, o, p, 1)(3, 0, 2) - 1,
1897 "levi_civita(n,o,p,1)(3,0,2)");
1898 test_for_zero(levi_civita(n, o, p, 1)(3, 0, 3),
1899 "levi_civita(n,o,p,1)(3,0,3)");
1900 test_for_zero(levi_civita(n, o, p, 1)(3, 1, 0),
1901 "levi_civita(n,o,p,1)(3,1,0)");
1902 test_for_zero(levi_civita(n, o, p, 1)(3, 1, 1),
1903 "levi_civita(n,o,p,1)(3,1,1)");
1904 test_for_zero(levi_civita(n, o, p, 1)(3, 1, 2),
1905 "levi_civita(n,o,p,1)(3,1,2)");
1906 test_for_zero(levi_civita(n, o, p, 1)(3, 1, 3),
1907 "levi_civita(n,o,p,1)(3,1,3)");
1908 test_for_zero(levi_civita(n, o, p, 1)(3, 2, 0) + 1,
1909 "levi_civita(n,o,p,1)(3,2,0)");
1910 test_for_zero(levi_civita(n, o, p, 1)(3, 2, 1),
1911 "levi_civita(n,o,p,1)(3,2,1)");
1912 test_for_zero(levi_civita(n, o, p, 1)(3, 2, 2),
1913 "levi_civita(n,o,p,1)(3,2,2)");
1914 test_for_zero(levi_civita(n, o, p, 1)(3, 2, 3),
1915 "levi_civita(n,o,p,1)(3,2,3)");
1916 test_for_zero(levi_civita(n, o, p, 1)(3, 3, 0),
1917 "levi_civita(n,o,p,1)(3,3,0)");
1918 test_for_zero(levi_civita(n, o, p, 1)(3, 3, 1),
1919 "levi_civita(n,o,p,1)(3,3,1)");
1920 test_for_zero(levi_civita(n, o, p, 1)(3, 3, 2),
1921 "levi_civita(n,o,p,1)(3,3,2)");
1922 test_for_zero(levi_civita(n, o, p, 1)(3, 3, 3),
1923 "levi_civita(n,o,p,1)(3,3,3)");
1924
1925 test_for_zero(levi_civita(n, o, p, 2)(0, 0, 0),
1926 "levi_civita(n,o,p,2)(0,0,0)");
1927 test_for_zero(levi_civita(n, o, p, 2)(0, 0, 1),
1928 "levi_civita(n,o,p,2)(0,0,1)");
1929 test_for_zero(levi_civita(n, o, p, 2)(0, 0, 2),
1930 "levi_civita(n,o,p,2)(0,0,2)");
1931 test_for_zero(levi_civita(n, o, p, 2)(0, 0, 3),
1932 "levi_civita(n,o,p,2)(0,0,3)");
1933 test_for_zero(levi_civita(n, o, p, 2)(0, 1, 0),
1934 "levi_civita(n,o,p,2)(0,1,0)");
1935 test_for_zero(levi_civita(n, o, p, 2)(0, 1, 1),
1936 "levi_civita(n,o,p,2)(0,1,1)");
1937 test_for_zero(levi_civita(n, o, p, 2)(0, 1, 2),
1938 "levi_civita(n,o,p,2)(0,1,2)");
1939 test_for_zero(levi_civita(n, o, p, 2)(0, 1, 3) + 1,
1940 "levi_civita(n,o,p,2)(0,1,3)");
1941 test_for_zero(levi_civita(n, o, p, 2)(0, 2, 0),
1942 "levi_civita(n,o,p,2)(0,2,0)");
1943 test_for_zero(levi_civita(n, o, p, 2)(0, 2, 1),
1944 "levi_civita(n,o,p,2)(0,2,1)");
1945 test_for_zero(levi_civita(n, o, p, 2)(0, 2, 2),
1946 "levi_civita(n,o,p,2)(0,2,2)");
1947 test_for_zero(levi_civita(n, o, p, 2)(0, 2, 3),
1948 "levi_civita(n,o,p,2)(0,2,3)");
1949 test_for_zero(levi_civita(n, o, p, 2)(0, 3, 0),
1950 "levi_civita(n,o,p,2)(0,3,0)");
1951 test_for_zero(levi_civita(n, o, p, 2)(0, 3, 1) - 1,
1952 "levi_civita(n,o,p,2)(0,3,1)");
1953 test_for_zero(levi_civita(n, o, p, 2)(0, 3, 2),
1954 "levi_civita(n,o,p,2)(0,3,2)");
1955 test_for_zero(levi_civita(n, o, p, 2)(0, 3, 3),
1956 "levi_civita(n,o,p,2)(0,3,3)");
1957 test_for_zero(levi_civita(n, o, p, 2)(1, 0, 0),
1958 "levi_civita(n,o,p,2)(1,0,0)");
1959 test_for_zero(levi_civita(n, o, p, 2)(1, 0, 1),
1960 "levi_civita(n,o,p,2)(1,0,1)");
1961 test_for_zero(levi_civita(n, o, p, 2)(1, 0, 2),
1962 "levi_civita(n,o,p,2)(1,0,2)");
1963 test_for_zero(levi_civita(n, o, p, 2)(1, 0, 3) - 1,
1964 "levi_civita(n,o,p,2)(1,0,3)");
1965 test_for_zero(levi_civita(n, o, p, 2)(1, 1, 0),
1966 "levi_civita(n,o,p,2)(1,1,0)");
1967 test_for_zero(levi_civita(n, o, p, 2)(1, 1, 1),
1968 "levi_civita(n,o,p,2)(1,1,1)");
1969 test_for_zero(levi_civita(n, o, p, 2)(1, 1, 2),
1970 "levi_civita(n,o,p,2)(1,1,2)");
1971 test_for_zero(levi_civita(n, o, p, 2)(1, 1, 3),
1972 "levi_civita(n,o,p,2)(1,1,3)");
1973 test_for_zero(levi_civita(n, o, p, 2)(1, 2, 0),
1974 "levi_civita(n,o,p,2)(1,2,0)");
1975 test_for_zero(levi_civita(n, o, p, 2)(1, 2, 1),
1976 "levi_civita(n,o,p,2)(1,2,1)");
1977 test_for_zero(levi_civita(n, o, p, 2)(1, 2, 2),
1978 "levi_civita(n,o,p,2)(1,2,2)");
1979 test_for_zero(levi_civita(n, o, p, 2)(1, 2, 3),
1980 "levi_civita(n,o,p,2)(1,2,3)");
1981 test_for_zero(levi_civita(n, o, p, 2)(1, 3, 0) + 1,
1982 "levi_civita(n,o,p,2)(1,3,0)");
1983 test_for_zero(levi_civita(n, o, p, 2)(1, 3, 1),
1984 "levi_civita(n,o,p,2)(1,3,1)");
1985 test_for_zero(levi_civita(n, o, p, 2)(1, 3, 2),
1986 "levi_civita(n,o,p,2)(1,3,2)");
1987 test_for_zero(levi_civita(n, o, p, 2)(1, 3, 3),
1988 "levi_civita(n,o,p,2)(1,3,3)");
1989 test_for_zero(levi_civita(n, o, p, 2)(2, 0, 0),
1990 "levi_civita(n,o,p,2)(2,0,0)");
1991 test_for_zero(levi_civita(n, o, p, 2)(2, 0, 1),
1992 "levi_civita(n,o,p,2)(2,0,1)");
1993 test_for_zero(levi_civita(n, o, p, 2)(2, 0, 2),
1994 "levi_civita(n,o,p,2)(2,0,2)");
1995 test_for_zero(levi_civita(n, o, p, 2)(2, 0, 3),
1996 "levi_civita(n,o,p,2)(2,0,3)");
1997 test_for_zero(levi_civita(n, o, p, 2)(2, 1, 0),
1998 "levi_civita(n,o,p,2)(2,1,0)");
1999 test_for_zero(levi_civita(n, o, p, 2)(2, 1, 1),
2000 "levi_civita(n,o,p,2)(2,1,1)");
2001 test_for_zero(levi_civita(n, o, p, 2)(2, 1, 2),
2002 "levi_civita(n,o,p,2)(2,1,2)");
2003 test_for_zero(levi_civita(n, o, p, 2)(2, 1, 3),
2004 "levi_civita(n,o,p,2)(2,1,3)");
2005 test_for_zero(levi_civita(n, o, p, 2)(2, 2, 0),
2006 "levi_civita(n,o,p,2)(2,2,0)");
2007 test_for_zero(levi_civita(n, o, p, 2)(2, 2, 1),
2008 "levi_civita(n,o,p,2)(2,2,1)");
2009 test_for_zero(levi_civita(n, o, p, 2)(2, 2, 2),
2010 "levi_civita(n,o,p,2)(2,2,2)");
2011 test_for_zero(levi_civita(n, o, p, 2)(2, 2, 3),
2012 "levi_civita(n,o,p,2)(2,2,3)");
2013 test_for_zero(levi_civita(n, o, p, 2)(2, 3, 0),
2014 "levi_civita(n,o,p,2)(2,3,0)");
2015 test_for_zero(levi_civita(n, o, p, 2)(2, 3, 1),
2016 "levi_civita(n,o,p,2)(2,3,1)");
2017 test_for_zero(levi_civita(n, o, p, 2)(2, 3, 2),
2018 "levi_civita(n,o,p,2)(2,3,2)");
2019 test_for_zero(levi_civita(n, o, p, 2)(2, 3, 3),
2020 "levi_civita(n,o,p,2)(2,3,3)");
2021 test_for_zero(levi_civita(n, o, p, 2)(3, 0, 0),
2022 "levi_civita(n,o,p,2)(3,0,0)");
2023 test_for_zero(levi_civita(n, o, p, 2)(3, 0, 1) + 1,
2024 "levi_civita(n,o,p,2)(3,0,1)");
2025 test_for_zero(levi_civita(n, o, p, 2)(3, 0, 2),
2026 "levi_civita(n,o,p,2)(3,0,2)");
2027 test_for_zero(levi_civita(n, o, p, 2)(3, 0, 3),
2028 "levi_civita(n,o,p,2)(3,0,3)");
2029 test_for_zero(levi_civita(n, o, p, 2)(3, 1, 0) - 1,
2030 "levi_civita(n,o,p,2)(3,1,0)");
2031 test_for_zero(levi_civita(n, o, p, 2)(3, 1, 1),
2032 "levi_civita(n,o,p,2)(3,1,1)");
2033 test_for_zero(levi_civita(n, o, p, 2)(3, 1, 2),
2034 "levi_civita(n,o,p,2)(3,1,2)");
2035 test_for_zero(levi_civita(n, o, p, 2)(3, 1, 3),
2036 "levi_civita(n,o,p,2)(3,1,3)");
2037 test_for_zero(levi_civita(n, o, p, 2)(3, 2, 0),
2038 "levi_civita(n,o,p,2)(3,2,0)");
2039 test_for_zero(levi_civita(n, o, p, 2)(3, 2, 1),
2040 "levi_civita(n,o,p,2)(3,2,1)");
2041 test_for_zero(levi_civita(n, o, p, 2)(3, 2, 2),
2042 "levi_civita(n,o,p,2)(3,2,2)");
2043 test_for_zero(levi_civita(n, o, p, 2)(3, 2, 3),
2044 "levi_civita(n,o,p,2)(3,2,3)");
2045 test_for_zero(levi_civita(n, o, p, 2)(3, 3, 0),
2046 "levi_civita(n,o,p,2)(3,3,0)");
2047 test_for_zero(levi_civita(n, o, p, 2)(3, 3, 1),
2048 "levi_civita(n,o,p,2)(3,3,1)");
2049 test_for_zero(levi_civita(n, o, p, 2)(3, 3, 2),
2050 "levi_civita(n,o,p,2)(3,3,2)");
2051 test_for_zero(levi_civita(n, o, p, 2)(3, 3, 3),
2052 "levi_civita(n,o,p,2)(3,3,3)");
2053
2054 test_for_zero(levi_civita(n, o, p, 3)(0, 0, 0),
2055 "levi_civita(n,o,p,3)(0,0,0)");
2056 test_for_zero(levi_civita(n, o, p, 3)(0, 0, 1),
2057 "levi_civita(n,o,p,3)(0,0,1)");
2058 test_for_zero(levi_civita(n, o, p, 3)(0, 0, 2),
2059 "levi_civita(n,o,p,3)(0,0,2)");
2060 test_for_zero(levi_civita(n, o, p, 3)(0, 0, 3),
2061 "levi_civita(n,o,p,3)(0,0,3)");
2062 test_for_zero(levi_civita(n, o, p, 3)(0, 1, 0),
2063 "levi_civita(n,o,p,3)(0,1,0)");
2064 test_for_zero(levi_civita(n, o, p, 3)(0, 1, 1),
2065 "levi_civita(n,o,p,3)(0,1,1)");
2066 test_for_zero(levi_civita(n, o, p, 3)(0, 1, 2) - 1,
2067 "levi_civita(n,o,p,3)(0,1,2)");
2068 test_for_zero(levi_civita(n, o, p, 3)(0, 1, 3),
2069 "levi_civita(n,o,p,3)(0,1,3)");
2070 test_for_zero(levi_civita(n, o, p, 3)(0, 2, 0),
2071 "levi_civita(n,o,p,3)(0,2,0)");
2072 test_for_zero(levi_civita(n, o, p, 3)(0, 2, 1) + 1,
2073 "levi_civita(n,o,p,3)(0,2,1)");
2074 test_for_zero(levi_civita(n, o, p, 3)(0, 2, 2),
2075 "levi_civita(n,o,p,3)(0,2,2)");
2076 test_for_zero(levi_civita(n, o, p, 3)(0, 2, 3),
2077 "levi_civita(n,o,p,3)(0,2,3)");
2078 test_for_zero(levi_civita(n, o, p, 3)(0, 3, 0),
2079 "levi_civita(n,o,p,3)(0,3,0)");
2080 test_for_zero(levi_civita(n, o, p, 3)(0, 3, 1),
2081 "levi_civita(n,o,p,3)(0,3,1)");
2082 test_for_zero(levi_civita(n, o, p, 3)(0, 3, 2),
2083 "levi_civita(n,o,p,3)(0,3,2)");
2084 test_for_zero(levi_civita(n, o, p, 3)(0, 3, 3),
2085 "levi_civita(n,o,p,3)(0,3,3)");
2086 test_for_zero(levi_civita(n, o, p, 3)(1, 0, 0),
2087 "levi_civita(n,o,p,3)(1,0,0)");
2088 test_for_zero(levi_civita(n, o, p, 3)(1, 0, 1),
2089 "levi_civita(n,o,p,3)(1,0,1)");
2090 test_for_zero(levi_civita(n, o, p, 3)(1, 0, 2) + 1,
2091 "levi_civita(n,o,p,3)(1,0,2)");
2092 test_for_zero(levi_civita(n, o, p, 3)(1, 0, 3),
2093 "levi_civita(n,o,p,3)(1,0,3)");
2094 test_for_zero(levi_civita(n, o, p, 3)(1, 1, 0),
2095 "levi_civita(n,o,p,3)(1,1,0)");
2096 test_for_zero(levi_civita(n, o, p, 3)(1, 1, 1),
2097 "levi_civita(n,o,p,3)(1,1,1)");
2098 test_for_zero(levi_civita(n, o, p, 3)(1, 1, 2),
2099 "levi_civita(n,o,p,3)(1,1,2)");
2100 test_for_zero(levi_civita(n, o, p, 3)(1, 1, 3),
2101 "levi_civita(n,o,p,3)(1,1,3)");
2102 test_for_zero(levi_civita(n, o, p, 3)(1, 2, 0) - 1,
2103 "levi_civita(n,o,p,3)(1,2,0)");
2104 test_for_zero(levi_civita(n, o, p, 3)(1, 2, 1),
2105 "levi_civita(n,o,p,3)(1,2,1)");
2106 test_for_zero(levi_civita(n, o, p, 3)(1, 2, 2),
2107 "levi_civita(n,o,p,3)(1,2,2)");
2108 test_for_zero(levi_civita(n, o, p, 3)(1, 2, 3),
2109 "levi_civita(n,o,p,3)(1,2,3)");
2110 test_for_zero(levi_civita(n, o, p, 3)(1, 3, 0),
2111 "levi_civita(n,o,p,3)(1,3,0)");
2112 test_for_zero(levi_civita(n, o, p, 3)(1, 3, 1),
2113 "levi_civita(n,o,p,3)(1,3,1)");
2114 test_for_zero(levi_civita(n, o, p, 3)(1, 3, 2),
2115 "levi_civita(n,o,p,3)(1,3,2)");
2116 test_for_zero(levi_civita(n, o, p, 3)(1, 3, 3),
2117 "levi_civita(n,o,p,3)(1,3,3)");
2118 test_for_zero(levi_civita(n, o, p, 3)(2, 0, 0),
2119 "levi_civita(n,o,p,3)(2,0,0)");
2120 test_for_zero(levi_civita(n, o, p, 3)(2, 0, 1) - 1,
2121 "levi_civita(n,o,p,3)(2,0,1)");
2122 test_for_zero(levi_civita(n, o, p, 3)(2, 0, 2),
2123 "levi_civita(n,o,p,3)(2,0,2)");
2124 test_for_zero(levi_civita(n, o, p, 3)(2, 0, 3),
2125 "levi_civita(n,o,p,3)(2,0,3)");
2126 test_for_zero(levi_civita(n, o, p, 3)(2, 1, 0) + 1,
2127 "levi_civita(n,o,p,3)(2,1,0)");
2128 test_for_zero(levi_civita(n, o, p, 3)(2, 1, 1),
2129 "levi_civita(n,o,p,3)(2,1,1)");
2130 test_for_zero(levi_civita(n, o, p, 3)(2, 1, 2),
2131 "levi_civita(n,o,p,3)(2,1,2)");
2132 test_for_zero(levi_civita(n, o, p, 3)(2, 1, 3),
2133 "levi_civita(n,o,p,3)(2,1,3)");
2134 test_for_zero(levi_civita(n, o, p, 3)(2, 2, 0),
2135 "levi_civita(n,o,p,3)(2,2,0)");
2136 test_for_zero(levi_civita(n, o, p, 3)(2, 2, 1),
2137 "levi_civita(n,o,p,3)(2,2,1)");
2138 test_for_zero(levi_civita(n, o, p, 3)(2, 2, 2),
2139 "levi_civita(n,o,p,3)(2,2,2)");
2140 test_for_zero(levi_civita(n, o, p, 3)(2, 2, 3),
2141 "levi_civita(n,o,p,3)(2,2,3)");
2142 test_for_zero(levi_civita(n, o, p, 3)(2, 3, 0),
2143 "levi_civita(n,o,p,3)(2,3,0)");
2144 test_for_zero(levi_civita(n, o, p, 3)(2, 3, 1),
2145 "levi_civita(n,o,p,3)(2,3,1)");
2146 test_for_zero(levi_civita(n, o, p, 3)(2, 3, 2),
2147 "levi_civita(n,o,p,3)(2,3,2)");
2148 test_for_zero(levi_civita(n, o, p, 3)(2, 3, 3),
2149 "levi_civita(n,o,p,3)(2,3,3)");
2150 test_for_zero(levi_civita(n, o, p, 3)(3, 0, 0),
2151 "levi_civita(n,o,p,3)(3,0,0)");
2152 test_for_zero(levi_civita(n, o, p, 3)(3, 0, 1),
2153 "levi_civita(n,o,p,3)(3,0,1)");
2154 test_for_zero(levi_civita(n, o, p, 3)(3, 0, 2),
2155 "levi_civita(n,o,p,3)(3,0,2)");
2156 test_for_zero(levi_civita(n, o, p, 3)(3, 0, 3),
2157 "levi_civita(n,o,p,3)(3,0,3)");
2158 test_for_zero(levi_civita(n, o, p, 3)(3, 1, 0),
2159 "levi_civita(n,o,p,3)(3,1,0)");
2160 test_for_zero(levi_civita(n, o, p, 3)(3, 1, 1),
2161 "levi_civita(n,o,p,3)(3,1,1)");
2162 test_for_zero(levi_civita(n, o, p, 3)(3, 1, 2),
2163 "levi_civita(n,o,p,3)(3,1,2)");
2164 test_for_zero(levi_civita(n, o, p, 3)(3, 1, 3),
2165 "levi_civita(n,o,p,3)(3,1,3)");
2166 test_for_zero(levi_civita(n, o, p, 3)(3, 2, 0),
2167 "levi_civita(n,o,p,3)(3,2,0)");
2168 test_for_zero(levi_civita(n, o, p, 3)(3, 2, 1),
2169 "levi_civita(n,o,p,3)(3,2,1)");
2170 test_for_zero(levi_civita(n, o, p, 3)(3, 2, 2),
2171 "levi_civita(n,o,p,3)(3,2,2)");
2172 test_for_zero(levi_civita(n, o, p, 3)(3, 2, 3),
2173 "levi_civita(n,o,p,3)(3,2,3)");
2174 test_for_zero(levi_civita(n, o, p, 3)(3, 3, 0),
2175 "levi_civita(n,o,p,3)(3,3,0)");
2176 test_for_zero(levi_civita(n, o, p, 3)(3, 3, 1),
2177 "levi_civita(n,o,p,3)(3,3,1)");
2178 test_for_zero(levi_civita(n, o, p, 3)(3, 3, 2),
2179 "levi_civita(n,o,p,3)(3,3,2)");
2180 test_for_zero(levi_civita(n, o, p, 3)(3, 3, 3),
2181 "levi_civita(n,o,p,3)(3,3,3)");
2182}
Tensors class implemented by Walter Landry.
FTensor::Index< 'i', SPACE_DIM > i
const double n
refractive index of diffusive medium
FTensor::Index< 'l', 3 > l
FTensor::Index< 'k', 3 > k
Tensors class implemented by Walter Landry.
Definition FTensor.hpp:51
constexpr std::enable_if<(Dim0<=2 &&Dim1<=2), Tensor2_Expr< Levi_Civita< T >, T, Dim0, Dim1, i, j > >::type levi_civita(const Index< i, Dim0 > &, const Index< j, Dim1 > &)
levi_civita functions to make for easy adhoc use
FTensor::Index< 'm', 3 > m
void test_Levi_Civita_02()
void test_for_zero(const T &t, const std::string &s)