v0.14.0
Functions
test_Levi_Civita.cpp File Reference
#include "../../../src/FTensor.hpp"
#include "../test_for_zero.hpp"
#include <iostream>

Go to the source code of this file.

Functions

void test_Levi_Civita_01 (void)
 
void test_Levi_Civita_02 (void)
 
void test_Levi_Civita_03 (void)
 
void test_Levi_Civita_04 (void)
 
void test_Levi_Civita ()
 

Function Documentation

◆ test_Levi_Civita()

void test_Levi_Civita ( )

Definition at line 12 of file test_Levi_Civita.cpp.

13 {
14  test_Levi_Civita_01();
15  test_Levi_Civita_02();
16  test_Levi_Civita_03();
17  test_Levi_Civita_04();
18 }

◆ test_Levi_Civita_01()

void test_Levi_Civita_01 ( void  )

Definition at line 7 of file test_Levi_Civita_01.cpp.

8 {
9  Index<'i', 2> i;
10  Index<'j', 2> j;
11 
12  Index<'k', 3> k;
13  Index<'l', 3> l;
14  Index<'m', 3> m;
15 
16  Index<'n', 4> n;
17  Index<'o', 4> o;
18  Index<'p', 4> p;
19  Index<'q', 4> q;
20 
21  Number<0> N0;
22  Number<1> N1;
23  Number<2> N2;
24 
25  /* Test Levi_Civita Rank 2 */
26  test_for_zero(levi_civita(i, j)(0, 0), "levi_civita(i,j)(0,0)");
27  test_for_zero(levi_civita(i, j)(0, 1) - 1, "levi_civita(i,j)(0,1)");
28  test_for_zero(levi_civita(i, j)(1, 0) + 1, "levi_civita(i,j)(1,0)");
29  test_for_zero(levi_civita(i, j)(1, 1), "levi_civita(i,j)(1,1)");
30 
31  /* Test Levi_Civita Rank 3 */
32  test_for_zero(levi_civita(k, l, m)(0, 0, 0), "levi_civita(k,l,m)(0,0,0)");
33  test_for_zero(levi_civita(k, l, m)(0, 0, 1), "levi_civita(k,l,m)(0,0,1)");
34  test_for_zero(levi_civita(k, l, m)(0, 0, 2), "levi_civita(k,l,m)(0,0,2)");
35  test_for_zero(levi_civita(k, l, m)(0, 1, 0), "levi_civita(k,l,m)(0,1,0)");
36  test_for_zero(levi_civita(k, l, m)(0, 1, 1), "levi_civita(k,l,m)(0,1,1)");
37  test_for_zero(levi_civita(k, l, m)(0, 1, 2) - 1,
38  "levi_civita(k,l,m)(0,1,2)");
39  test_for_zero(levi_civita(k, l, m)(0, 2, 0), "levi_civita(k,l,m)(0,2,0)");
40  test_for_zero(levi_civita(k, l, m)(0, 2, 1) + 1,
41  "levi_civita(k,l,m)(0,2,1)");
42  test_for_zero(levi_civita(k, l, m)(0, 2, 2), "levi_civita(k,l,m)(0,2,2)");
43  test_for_zero(levi_civita(k, l, m)(1, 0, 0), "levi_civita(k,l,m)(1,0,0)");
44  test_for_zero(levi_civita(k, l, m)(1, 0, 1), "levi_civita(k,l,m)(1,0,1)");
45  test_for_zero(levi_civita(k, l, m)(1, 0, 2) + 1,
46  "levi_civita(k,l,m)(1,0,2)");
47  test_for_zero(levi_civita(k, l, m)(1, 1, 0), "levi_civita(k,l,m)(1,1,0)");
48  test_for_zero(levi_civita(k, l, m)(1, 1, 1), "levi_civita(k,l,m)(1,1,1)");
49  test_for_zero(levi_civita(k, l, m)(1, 1, 2), "levi_civita(k,l,m)(1,1,2)");
50  test_for_zero(levi_civita(k, l, m)(1, 2, 0) - 1,
51  "levi_civita(k,l,m)(1,2,0)");
52  test_for_zero(levi_civita(k, l, m)(1, 2, 1), "levi_civita(k,l,m)(1,2,1)");
53  test_for_zero(levi_civita(k, l, m)(1, 2, 2), "levi_civita(k,l,m)(1,2,2)");
54  test_for_zero(levi_civita(k, l, m)(2, 0, 0), "levi_civita(k,l,m)(2,0,0)");
55  test_for_zero(levi_civita(k, l, m)(2, 0, 1) - 1,
56  "levi_civita(k,l,m)(2,0,1)");
57  test_for_zero(levi_civita(k, l, m)(2, 0, 2), "levi_civita(k,l,m)(2,0,2)");
58  test_for_zero(levi_civita(k, l, m)(2, 1, 0) + 1,
59  "levi_civita(k,l,m)(2,1,0)");
60  test_for_zero(levi_civita(k, l, m)(2, 1, 1), "levi_civita(k,l,m)(2,1,1)");
61  test_for_zero(levi_civita(k, l, m)(2, 1, 2), "levi_civita(k,l,m)(2,1,2)");
62  test_for_zero(levi_civita(k, l, m)(2, 2, 0), "levi_civita(k,l,m)(2,2,0)");
63  test_for_zero(levi_civita(k, l, m)(2, 2, 1), "levi_civita(k,l,m)(2,2,1)");
64  test_for_zero(levi_civita(k, l, m)(2, 2, 2), "levi_civita(k,l,m)(2,2,2)");
65 
66  /* Test Levi_Civita Rank 4 */
67  test_for_zero(levi_civita(n, o, p, q)(0, 0, 0, 0),
68  "levi_civita(n,o,p,q)(0,0,0,0)");
69  test_for_zero(levi_civita(n, o, p, q)(0, 0, 0, 1),
70  "levi_civita(n,o,p,q)(0,0,0,1)");
71  test_for_zero(levi_civita(n, o, p, q)(0, 0, 0, 2),
72  "levi_civita(n,o,p,q)(0,0,0,2)");
73  test_for_zero(levi_civita(n, o, p, q)(0, 0, 0, 3),
74  "levi_civita(n,o,p,q)(0,0,0,3)");
75  test_for_zero(levi_civita(n, o, p, q)(0, 0, 1, 0),
76  "levi_civita(n,o,p,q)(0,0,1,0)");
77  test_for_zero(levi_civita(n, o, p, q)(0, 0, 1, 1),
78  "levi_civita(n,o,p,q)(0,0,1,1)");
79  test_for_zero(levi_civita(n, o, p, q)(0, 0, 1, 2),
80  "levi_civita(n,o,p,q)(0,0,1,2)");
81  test_for_zero(levi_civita(n, o, p, q)(0, 0, 1, 3),
82  "levi_civita(n,o,p,q)(0,0,1,3)");
83  test_for_zero(levi_civita(n, o, p, q)(0, 0, 2, 0),
84  "levi_civita(n,o,p,q)(0,0,2,0)");
85  test_for_zero(levi_civita(n, o, p, q)(0, 0, 2, 1),
86  "levi_civita(n,o,p,q)(0,0,2,1)");
87  test_for_zero(levi_civita(n, o, p, q)(0, 0, 2, 2),
88  "levi_civita(n,o,p,q)(0,0,2,2)");
89  test_for_zero(levi_civita(n, o, p, q)(0, 0, 2, 3),
90  "levi_civita(n,o,p,q)(0,0,2,3)");
91  test_for_zero(levi_civita(n, o, p, q)(0, 0, 3, 0),
92  "levi_civita(n,o,p,q)(0,0,3,0)");
93  test_for_zero(levi_civita(n, o, p, q)(0, 0, 3, 1),
94  "levi_civita(n,o,p,q)(0,0,3,1)");
95  test_for_zero(levi_civita(n, o, p, q)(0, 0, 3, 2),
96  "levi_civita(n,o,p,q)(0,0,3,2)");
97  test_for_zero(levi_civita(n, o, p, q)(0, 0, 3, 3),
98  "levi_civita(n,o,p,q)(0,0,3,3)");
99  test_for_zero(levi_civita(n, o, p, q)(0, 1, 0, 0),
100  "levi_civita(n,o,p,q)(0,1,0,0)");
101  test_for_zero(levi_civita(n, o, p, q)(0, 1, 0, 1),
102  "levi_civita(n,o,p,q)(0,1,0,1)");
103  test_for_zero(levi_civita(n, o, p, q)(0, 1, 0, 2),
104  "levi_civita(n,o,p,q)(0,1,0,2)");
105  test_for_zero(levi_civita(n, o, p, q)(0, 1, 0, 3),
106  "levi_civita(n,o,p,q)(0,1,0,3)");
107  test_for_zero(levi_civita(n, o, p, q)(0, 1, 1, 0),
108  "levi_civita(n,o,p,q)(0,1,1,0)");
109  test_for_zero(levi_civita(n, o, p, q)(0, 1, 1, 1),
110  "levi_civita(n,o,p,q)(0,1,1,1)");
111  test_for_zero(levi_civita(n, o, p, q)(0, 1, 1, 2),
112  "levi_civita(n,o,p,q)(0,1,1,2)");
113  test_for_zero(levi_civita(n, o, p, q)(0, 1, 1, 3),
114  "levi_civita(n,o,p,q)(0,1,1,3)");
115  test_for_zero(levi_civita(n, o, p, q)(0, 1, 2, 0),
116  "levi_civita(n,o,p,q)(0,1,2,0)");
117  test_for_zero(levi_civita(n, o, p, q)(0, 1, 2, 1),
118  "levi_civita(n,o,p,q)(0,1,2,1)");
119  test_for_zero(levi_civita(n, o, p, q)(0, 1, 2, 2),
120  "levi_civita(n,o,p,q)(0,1,2,2)");
121  test_for_zero(levi_civita(n, o, p, q)(0, 1, 2, 3) - 1,
122  "levi_civita(n,o,p,q)(0,1,2,3)");
123  test_for_zero(levi_civita(n, o, p, q)(0, 1, 3, 0),
124  "levi_civita(n,o,p,q)(0,1,3,0)");
125  test_for_zero(levi_civita(n, o, p, q)(0, 1, 3, 1),
126  "levi_civita(n,o,p,q)(0,1,3,1)");
127  test_for_zero(levi_civita(n, o, p, q)(0, 1, 3, 2) + 1,
128  "levi_civita(n,o,p,q)(0,1,3,2)");
129  test_for_zero(levi_civita(n, o, p, q)(0, 1, 3, 3),
130  "levi_civita(n,o,p,q)(0,1,3,3)");
131  test_for_zero(levi_civita(n, o, p, q)(0, 2, 0, 0),
132  "levi_civita(n,o,p,q)(0,2,0,0)");
133  test_for_zero(levi_civita(n, o, p, q)(0, 2, 0, 1),
134  "levi_civita(n,o,p,q)(0,2,0,1)");
135  test_for_zero(levi_civita(n, o, p, q)(0, 2, 0, 2),
136  "levi_civita(n,o,p,q)(0,2,0,2)");
137  test_for_zero(levi_civita(n, o, p, q)(0, 2, 0, 3),
138  "levi_civita(n,o,p,q)(0,2,0,3)");
139  test_for_zero(levi_civita(n, o, p, q)(0, 2, 1, 0),
140  "levi_civita(n,o,p,q)(0,2,1,0)");
141  test_for_zero(levi_civita(n, o, p, q)(0, 2, 1, 1),
142  "levi_civita(n,o,p,q)(0,2,1,1)");
143  test_for_zero(levi_civita(n, o, p, q)(0, 2, 1, 2),
144  "levi_civita(n,o,p,q)(0,2,1,2)");
145  test_for_zero(levi_civita(n, o, p, q)(0, 2, 1, 3) + 1,
146  "levi_civita(n,o,p,q)(0,2,1,3)");
147  test_for_zero(levi_civita(n, o, p, q)(0, 2, 2, 0),
148  "levi_civita(n,o,p,q)(0,2,2,0)");
149  test_for_zero(levi_civita(n, o, p, q)(0, 2, 2, 1),
150  "levi_civita(n,o,p,q)(0,2,2,1)");
151  test_for_zero(levi_civita(n, o, p, q)(0, 2, 2, 2),
152  "levi_civita(n,o,p,q)(0,2,2,2)");
153  test_for_zero(levi_civita(n, o, p, q)(0, 2, 2, 3),
154  "levi_civita(n,o,p,q)(0,2,2,3)");
155  test_for_zero(levi_civita(n, o, p, q)(0, 2, 3, 0),
156  "levi_civita(n,o,p,q)(0,2,3,0)");
157  test_for_zero(levi_civita(n, o, p, q)(0, 2, 3, 1) - 1,
158  "levi_civita(n,o,p,q)(0,2,3,1)");
159  test_for_zero(levi_civita(n, o, p, q)(0, 2, 3, 2),
160  "levi_civita(n,o,p,q)(0,2,3,2)");
161  test_for_zero(levi_civita(n, o, p, q)(0, 2, 3, 3),
162  "levi_civita(n,o,p,q)(0,2,3,3)");
163  test_for_zero(levi_civita(n, o, p, q)(0, 3, 0, 0),
164  "levi_civita(n,o,p,q)(0,3,0,0)");
165  test_for_zero(levi_civita(n, o, p, q)(0, 3, 0, 1),
166  "levi_civita(n,o,p,q)(0,3,0,1)");
167  test_for_zero(levi_civita(n, o, p, q)(0, 3, 0, 2),
168  "levi_civita(n,o,p,q)(0,3,0,2)");
169  test_for_zero(levi_civita(n, o, p, q)(0, 3, 0, 3),
170  "levi_civita(n,o,p,q)(0,3,0,3)");
171  test_for_zero(levi_civita(n, o, p, q)(0, 3, 1, 0),
172  "levi_civita(n,o,p,q)(0,3,1,0)");
173  test_for_zero(levi_civita(n, o, p, q)(0, 3, 1, 1),
174  "levi_civita(n,o,p,q)(0,3,1,1)");
175  test_for_zero(levi_civita(n, o, p, q)(0, 3, 1, 2) - 1,
176  "levi_civita(n,o,p,q)(0,3,1,2)");
177  test_for_zero(levi_civita(n, o, p, q)(0, 3, 1, 3),
178  "levi_civita(n,o,p,q)(0,3,1,3)");
179  test_for_zero(levi_civita(n, o, p, q)(0, 3, 2, 0),
180  "levi_civita(n,o,p,q)(0,3,2,0)");
181  test_for_zero(levi_civita(n, o, p, q)(0, 3, 2, 1) + 1,
182  "levi_civita(n,o,p,q)(0,3,2,1)");
183  test_for_zero(levi_civita(n, o, p, q)(0, 3, 2, 2),
184  "levi_civita(n,o,p,q)(0,3,2,2)");
185  test_for_zero(levi_civita(n, o, p, q)(0, 3, 2, 3),
186  "levi_civita(n,o,p,q)(0,3,2,3)");
187  test_for_zero(levi_civita(n, o, p, q)(0, 3, 3, 0),
188  "levi_civita(n,o,p,q)(0,3,3,0)");
189  test_for_zero(levi_civita(n, o, p, q)(0, 3, 3, 1),
190  "levi_civita(n,o,p,q)(0,3,3,1)");
191  test_for_zero(levi_civita(n, o, p, q)(0, 3, 3, 2),
192  "levi_civita(n,o,p,q)(0,3,3,2)");
193  test_for_zero(levi_civita(n, o, p, q)(0, 3, 3, 3),
194  "levi_civita(n,o,p,q)(0,3,3,3)");
195 
196  test_for_zero(levi_civita(n, o, p, q)(1, 0, 0, 0),
197  "levi_civita(n,o,p,q)(1,0,0,0)");
198  test_for_zero(levi_civita(n, o, p, q)(1, 0, 0, 1),
199  "levi_civita(n,o,p,q)(1,0,0,1)");
200  test_for_zero(levi_civita(n, o, p, q)(1, 0, 0, 2),
201  "levi_civita(n,o,p,q)(1,0,0,2)");
202  test_for_zero(levi_civita(n, o, p, q)(1, 0, 0, 3),
203  "levi_civita(n,o,p,q)(1,0,0,3)");
204  test_for_zero(levi_civita(n, o, p, q)(1, 0, 1, 0),
205  "levi_civita(n,o,p,q)(1,0,1,0)");
206  test_for_zero(levi_civita(n, o, p, q)(1, 0, 1, 1),
207  "levi_civita(n,o,p,q)(1,0,1,1)");
208  test_for_zero(levi_civita(n, o, p, q)(1, 0, 1, 2),
209  "levi_civita(n,o,p,q)(1,0,1,2)");
210  test_for_zero(levi_civita(n, o, p, q)(1, 0, 1, 3),
211  "levi_civita(n,o,p,q)(1,0,1,3)");
212  test_for_zero(levi_civita(n, o, p, q)(1, 0, 2, 0),
213  "levi_civita(n,o,p,q)(1,0,2,0)");
214  test_for_zero(levi_civita(n, o, p, q)(1, 0, 2, 1),
215  "levi_civita(n,o,p,q)(1,0,2,1)");
216  test_for_zero(levi_civita(n, o, p, q)(1, 0, 2, 2),
217  "levi_civita(n,o,p,q)(1,0,2,2)");
218  test_for_zero(levi_civita(n, o, p, q)(1, 0, 2, 3) + 1,
219  "levi_civita(n,o,p,q)(1,0,2,3)");
220  test_for_zero(levi_civita(n, o, p, q)(1, 0, 3, 0),
221  "levi_civita(n,o,p,q)(1,0,3,0)");
222  test_for_zero(levi_civita(n, o, p, q)(1, 0, 3, 1),
223  "levi_civita(n,o,p,q)(1,0,3,1)");
224  test_for_zero(levi_civita(n, o, p, q)(1, 0, 3, 2) - 1,
225  "levi_civita(n,o,p,q)(1,0,3,2)");
226  test_for_zero(levi_civita(n, o, p, q)(1, 0, 3, 3),
227  "levi_civita(n,o,p,q)(1,0,3,3)");
228  test_for_zero(levi_civita(n, o, p, q)(1, 1, 0, 0),
229  "levi_civita(n,o,p,q)(1,1,0,0)");
230  test_for_zero(levi_civita(n, o, p, q)(1, 1, 0, 1),
231  "levi_civita(n,o,p,q)(1,1,0,1)");
232  test_for_zero(levi_civita(n, o, p, q)(1, 1, 0, 2),
233  "levi_civita(n,o,p,q)(1,1,0,2)");
234  test_for_zero(levi_civita(n, o, p, q)(1, 1, 0, 3),
235  "levi_civita(n,o,p,q)(1,1,0,3)");
236  test_for_zero(levi_civita(n, o, p, q)(1, 1, 1, 0),
237  "levi_civita(n,o,p,q)(1,1,1,0)");
238  test_for_zero(levi_civita(n, o, p, q)(1, 1, 1, 1),
239  "levi_civita(n,o,p,q)(1,1,1,1)");
240  test_for_zero(levi_civita(n, o, p, q)(1, 1, 1, 2),
241  "levi_civita(n,o,p,q)(1,1,1,2)");
242  test_for_zero(levi_civita(n, o, p, q)(1, 1, 1, 3),
243  "levi_civita(n,o,p,q)(1,1,1,3)");
244  test_for_zero(levi_civita(n, o, p, q)(1, 1, 2, 0),
245  "levi_civita(n,o,p,q)(1,1,2,0)");
246  test_for_zero(levi_civita(n, o, p, q)(1, 1, 2, 1),
247  "levi_civita(n,o,p,q)(1,1,2,1)");
248  test_for_zero(levi_civita(n, o, p, q)(1, 1, 2, 2),
249  "levi_civita(n,o,p,q)(1,1,2,2)");
250  test_for_zero(levi_civita(n, o, p, q)(1, 1, 2, 3),
251  "levi_civita(n,o,p,q)(1,1,2,3)");
252  test_for_zero(levi_civita(n, o, p, q)(1, 1, 3, 0),
253  "levi_civita(n,o,p,q)(1,1,3,0)");
254  test_for_zero(levi_civita(n, o, p, q)(1, 1, 3, 1),
255  "levi_civita(n,o,p,q)(1,1,3,1)");
256  test_for_zero(levi_civita(n, o, p, q)(1, 1, 3, 2),
257  "levi_civita(n,o,p,q)(1,1,3,2)");
258  test_for_zero(levi_civita(n, o, p, q)(1, 1, 3, 3),
259  "levi_civita(n,o,p,q)(1,1,3,3)");
260  test_for_zero(levi_civita(n, o, p, q)(1, 2, 0, 0),
261  "levi_civita(n,o,p,q)(1,2,0,0)");
262  test_for_zero(levi_civita(n, o, p, q)(1, 2, 0, 1),
263  "levi_civita(n,o,p,q)(1,2,0,1)");
264  test_for_zero(levi_civita(n, o, p, q)(1, 2, 0, 2),
265  "levi_civita(n,o,p,q)(1,2,0,2)");
266  test_for_zero(levi_civita(n, o, p, q)(1, 2, 0, 3) - 1,
267  "levi_civita(n,o,p,q)(1,2,0,3)");
268  test_for_zero(levi_civita(n, o, p, q)(1, 2, 1, 0),
269  "levi_civita(n,o,p,q)(1,2,1,0)");
270  test_for_zero(levi_civita(n, o, p, q)(1, 2, 1, 1),
271  "levi_civita(n,o,p,q)(1,2,1,1)");
272  test_for_zero(levi_civita(n, o, p, q)(1, 2, 1, 2),
273  "levi_civita(n,o,p,q)(1,2,1,2)");
274  test_for_zero(levi_civita(n, o, p, q)(1, 2, 1, 3),
275  "levi_civita(n,o,p,q)(1,2,1,3)");
276  test_for_zero(levi_civita(n, o, p, q)(1, 2, 2, 0),
277  "levi_civita(n,o,p,q)(1,2,2,0)");
278  test_for_zero(levi_civita(n, o, p, q)(1, 2, 2, 1),
279  "levi_civita(n,o,p,q)(1,2,2,1)");
280  test_for_zero(levi_civita(n, o, p, q)(1, 2, 2, 2),
281  "levi_civita(n,o,p,q)(1,2,2,2)");
282  test_for_zero(levi_civita(n, o, p, q)(1, 2, 2, 3),
283  "levi_civita(n,o,p,q)(1,2,2,3)");
284  test_for_zero(levi_civita(n, o, p, q)(1, 2, 3, 0) + 1,
285  "levi_civita(n,o,p,q)(1,2,3,0)");
286  test_for_zero(levi_civita(n, o, p, q)(1, 2, 3, 1),
287  "levi_civita(n,o,p,q)(1,2,3,1)");
288  test_for_zero(levi_civita(n, o, p, q)(1, 2, 3, 2),
289  "levi_civita(n,o,p,q)(1,2,3,2)");
290  test_for_zero(levi_civita(n, o, p, q)(1, 2, 3, 3),
291  "levi_civita(n,o,p,q)(1,2,3,3)");
292  test_for_zero(levi_civita(n, o, p, q)(1, 3, 0, 0),
293  "levi_civita(n,o,p,q)(1,3,0,0)");
294  test_for_zero(levi_civita(n, o, p, q)(1, 3, 0, 1),
295  "levi_civita(n,o,p,q)(1,3,0,1)");
296  test_for_zero(levi_civita(n, o, p, q)(1, 3, 0, 2) + 1,
297  "levi_civita(n,o,p,q)(1,3,0,2)");
298  test_for_zero(levi_civita(n, o, p, q)(1, 3, 0, 3),
299  "levi_civita(n,o,p,q)(1,3,0,3)");
300  test_for_zero(levi_civita(n, o, p, q)(1, 3, 1, 0),
301  "levi_civita(n,o,p,q)(1,3,1,0)");
302  test_for_zero(levi_civita(n, o, p, q)(1, 3, 1, 1),
303  "levi_civita(n,o,p,q)(1,3,1,1)");
304  test_for_zero(levi_civita(n, o, p, q)(1, 3, 1, 2),
305  "levi_civita(n,o,p,q)(1,3,1,2)");
306  test_for_zero(levi_civita(n, o, p, q)(1, 3, 1, 3),
307  "levi_civita(n,o,p,q)(1,3,1,3)");
308  test_for_zero(levi_civita(n, o, p, q)(1, 3, 2, 0) - 1,
309  "levi_civita(n,o,p,q)(1,3,2,0)");
310  test_for_zero(levi_civita(n, o, p, q)(1, 3, 2, 1),
311  "levi_civita(n,o,p,q)(1,3,2,1)");
312  test_for_zero(levi_civita(n, o, p, q)(1, 3, 2, 2),
313  "levi_civita(n,o,p,q)(1,3,2,2)");
314  test_for_zero(levi_civita(n, o, p, q)(1, 3, 2, 3),
315  "levi_civita(n,o,p,q)(1,3,2,3)");
316  test_for_zero(levi_civita(n, o, p, q)(1, 3, 3, 0),
317  "levi_civita(n,o,p,q)(1,3,3,0)");
318  test_for_zero(levi_civita(n, o, p, q)(1, 3, 3, 1),
319  "levi_civita(n,o,p,q)(1,3,3,1)");
320  test_for_zero(levi_civita(n, o, p, q)(1, 3, 3, 2),
321  "levi_civita(n,o,p,q)(1,3,3,2)");
322  test_for_zero(levi_civita(n, o, p, q)(1, 3, 3, 3),
323  "levi_civita(n,o,p,q)(1,3,3,3)");
324 
325  test_for_zero(levi_civita(n, o, p, q)(2, 0, 0, 0),
326  "levi_civita(n,o,p,q)(2,0,0,0)");
327  test_for_zero(levi_civita(n, o, p, q)(2, 0, 0, 1),
328  "levi_civita(n,o,p,q)(2,0,0,1)");
329  test_for_zero(levi_civita(n, o, p, q)(2, 0, 0, 2),
330  "levi_civita(n,o,p,q)(2,0,0,2)");
331  test_for_zero(levi_civita(n, o, p, q)(2, 0, 0, 3),
332  "levi_civita(n,o,p,q)(2,0,0,3)");
333  test_for_zero(levi_civita(n, o, p, q)(2, 0, 1, 0),
334  "levi_civita(n,o,p,q)(2,0,1,0)");
335  test_for_zero(levi_civita(n, o, p, q)(2, 0, 1, 1),
336  "levi_civita(n,o,p,q)(2,0,1,1)");
337  test_for_zero(levi_civita(n, o, p, q)(2, 0, 1, 2),
338  "levi_civita(n,o,p,q)(2,0,1,2)");
339  test_for_zero(levi_civita(n, o, p, q)(2, 0, 1, 3) - 1,
340  "levi_civita(n,o,p,q)(2,0,1,3)");
341  test_for_zero(levi_civita(n, o, p, q)(2, 0, 2, 0),
342  "levi_civita(n,o,p,q)(2,0,2,0)");
343  test_for_zero(levi_civita(n, o, p, q)(2, 0, 2, 1),
344  "levi_civita(n,o,p,q)(2,0,2,1)");
345  test_for_zero(levi_civita(n, o, p, q)(2, 0, 2, 2),
346  "levi_civita(n,o,p,q)(2,0,2,2)");
347  test_for_zero(levi_civita(n, o, p, q)(2, 0, 2, 3),
348  "levi_civita(n,o,p,q)(2,0,2,3)");
349  test_for_zero(levi_civita(n, o, p, q)(2, 0, 3, 0),
350  "levi_civita(n,o,p,q)(2,0,3,0)");
351  test_for_zero(levi_civita(n, o, p, q)(2, 0, 3, 1) + 1,
352  "levi_civita(n,o,p,q)(2,0,3,1)");
353  test_for_zero(levi_civita(n, o, p, q)(2, 0, 3, 2),
354  "levi_civita(n,o,p,q)(2,0,3,2)");
355  test_for_zero(levi_civita(n, o, p, q)(2, 0, 3, 3),
356  "levi_civita(n,o,p,q)(2,0,3,3)");
357  test_for_zero(levi_civita(n, o, p, q)(2, 1, 0, 0),
358  "levi_civita(n,o,p,q)(2,1,0,0)");
359  test_for_zero(levi_civita(n, o, p, q)(2, 1, 0, 1),
360  "levi_civita(n,o,p,q)(2,1,0,1)");
361  test_for_zero(levi_civita(n, o, p, q)(2, 1, 0, 2),
362  "levi_civita(n,o,p,q)(2,1,0,2)");
363  test_for_zero(levi_civita(n, o, p, q)(2, 1, 0, 3) + 1,
364  "levi_civita(n,o,p,q)(2,1,0,3)");
365  test_for_zero(levi_civita(n, o, p, q)(2, 1, 1, 0),
366  "levi_civita(n,o,p,q)(2,1,1,0)");
367  test_for_zero(levi_civita(n, o, p, q)(2, 1, 1, 1),
368  "levi_civita(n,o,p,q)(2,1,1,1)");
369  test_for_zero(levi_civita(n, o, p, q)(2, 1, 1, 2),
370  "levi_civita(n,o,p,q)(2,1,1,2)");
371  test_for_zero(levi_civita(n, o, p, q)(2, 1, 1, 3),
372  "levi_civita(n,o,p,q)(2,1,1,3)");
373  test_for_zero(levi_civita(n, o, p, q)(2, 1, 2, 0),
374  "levi_civita(n,o,p,q)(2,1,2,0)");
375  test_for_zero(levi_civita(n, o, p, q)(2, 1, 2, 1),
376  "levi_civita(n,o,p,q)(2,1,2,1)");
377  test_for_zero(levi_civita(n, o, p, q)(2, 1, 2, 2),
378  "levi_civita(n,o,p,q)(2,1,2,2)");
379  test_for_zero(levi_civita(n, o, p, q)(2, 1, 2, 3),
380  "levi_civita(n,o,p,q)(2,1,2,3)");
381  test_for_zero(levi_civita(n, o, p, q)(2, 1, 3, 0) - 1,
382  "levi_civita(n,o,p,q)(2,1,3,0)");
383  test_for_zero(levi_civita(n, o, p, q)(2, 1, 3, 1),
384  "levi_civita(n,o,p,q)(2,1,3,1)");
385  test_for_zero(levi_civita(n, o, p, q)(2, 1, 3, 2),
386  "levi_civita(n,o,p,q)(2,1,3,2)");
387  test_for_zero(levi_civita(n, o, p, q)(2, 1, 3, 3),
388  "levi_civita(n,o,p,q)(2,1,3,3)");
389  test_for_zero(levi_civita(n, o, p, q)(2, 2, 0, 0),
390  "levi_civita(n,o,p,q)(2,2,0,0)");
391  test_for_zero(levi_civita(n, o, p, q)(2, 2, 0, 1),
392  "levi_civita(n,o,p,q)(2,2,0,1)");
393  test_for_zero(levi_civita(n, o, p, q)(2, 2, 0, 2),
394  "levi_civita(n,o,p,q)(2,2,0,2)");
395  test_for_zero(levi_civita(n, o, p, q)(2, 2, 0, 3),
396  "levi_civita(n,o,p,q)(2,2,0,3)");
397  test_for_zero(levi_civita(n, o, p, q)(2, 2, 1, 0),
398  "levi_civita(n,o,p,q)(2,2,1,0)");
399  test_for_zero(levi_civita(n, o, p, q)(2, 2, 1, 1),
400  "levi_civita(n,o,p,q)(2,2,1,1)");
401  test_for_zero(levi_civita(n, o, p, q)(2, 2, 1, 2),
402  "levi_civita(n,o,p,q)(2,2,1,2)");
403  test_for_zero(levi_civita(n, o, p, q)(2, 2, 1, 3),
404  "levi_civita(n,o,p,q)(2,2,1,3)");
405  test_for_zero(levi_civita(n, o, p, q)(2, 2, 2, 0),
406  "levi_civita(n,o,p,q)(2,2,2,0)");
407  test_for_zero(levi_civita(n, o, p, q)(2, 2, 2, 1),
408  "levi_civita(n,o,p,q)(2,2,2,1)");
409  test_for_zero(levi_civita(n, o, p, q)(2, 2, 2, 2),
410  "levi_civita(n,o,p,q)(2,2,2,2)");
411  test_for_zero(levi_civita(n, o, p, q)(2, 2, 2, 3),
412  "levi_civita(n,o,p,q)(2,2,2,3)");
413  test_for_zero(levi_civita(n, o, p, q)(2, 2, 3, 0),
414  "levi_civita(n,o,p,q)(2,2,3,0)");
415  test_for_zero(levi_civita(n, o, p, q)(2, 2, 3, 1),
416  "levi_civita(n,o,p,q)(2,2,3,1)");
417  test_for_zero(levi_civita(n, o, p, q)(2, 2, 3, 2),
418  "levi_civita(n,o,p,q)(2,2,3,2)");
419  test_for_zero(levi_civita(n, o, p, q)(2, 2, 3, 3),
420  "levi_civita(n,o,p,q)(2,2,3,3)");
421  test_for_zero(levi_civita(n, o, p, q)(2, 3, 0, 0),
422  "levi_civita(n,o,p,q)(2,3,0,0)");
423  test_for_zero(levi_civita(n, o, p, q)(2, 3, 0, 1) - 1,
424  "levi_civita(n,o,p,q)(2,3,0,1)");
425  test_for_zero(levi_civita(n, o, p, q)(2, 3, 0, 2),
426  "levi_civita(n,o,p,q)(2,3,0,2)");
427  test_for_zero(levi_civita(n, o, p, q)(2, 3, 0, 3),
428  "levi_civita(n,o,p,q)(2,3,0,3)");
429  test_for_zero(levi_civita(n, o, p, q)(2, 3, 1, 0) + 1,
430  "levi_civita(n,o,p,q)(2,3,1,0)");
431  test_for_zero(levi_civita(n, o, p, q)(2, 3, 1, 1),
432  "levi_civita(n,o,p,q)(2,3,1,1)");
433  test_for_zero(levi_civita(n, o, p, q)(2, 3, 1, 2),
434  "levi_civita(n,o,p,q)(2,3,1,2)");
435  test_for_zero(levi_civita(n, o, p, q)(2, 3, 1, 3),
436  "levi_civita(n,o,p,q)(2,3,1,3)");
437  test_for_zero(levi_civita(n, o, p, q)(2, 3, 2, 0),
438  "levi_civita(n,o,p,q)(2,3,2,0)");
439  test_for_zero(levi_civita(n, o, p, q)(2, 3, 2, 1),
440  "levi_civita(n,o,p,q)(2,3,2,1)");
441  test_for_zero(levi_civita(n, o, p, q)(2, 3, 2, 2),
442  "levi_civita(n,o,p,q)(2,3,2,2)");
443  test_for_zero(levi_civita(n, o, p, q)(2, 3, 2, 3),
444  "levi_civita(n,o,p,q)(2,3,2,3)");
445  test_for_zero(levi_civita(n, o, p, q)(2, 3, 3, 0),
446  "levi_civita(n,o,p,q)(2,3,3,0)");
447  test_for_zero(levi_civita(n, o, p, q)(2, 3, 3, 1),
448  "levi_civita(n,o,p,q)(2,3,3,1)");
449  test_for_zero(levi_civita(n, o, p, q)(2, 3, 3, 2),
450  "levi_civita(n,o,p,q)(2,3,3,2)");
451  test_for_zero(levi_civita(n, o, p, q)(2, 3, 3, 3),
452  "levi_civita(n,o,p,q)(2,3,3,3)");
453 
454  test_for_zero(levi_civita(n, o, p, q)(3, 0, 0, 0),
455  "levi_civita(n,o,p,q)(3,0,0,0)");
456  test_for_zero(levi_civita(n, o, p, q)(3, 0, 0, 1),
457  "levi_civita(n,o,p,q)(3,0,0,1)");
458  test_for_zero(levi_civita(n, o, p, q)(3, 0, 0, 2),
459  "levi_civita(n,o,p,q)(3,0,0,2)");
460  test_for_zero(levi_civita(n, o, p, q)(3, 0, 0, 3),
461  "levi_civita(n,o,p,q)(3,0,0,3)");
462  test_for_zero(levi_civita(n, o, p, q)(3, 0, 1, 0),
463  "levi_civita(n,o,p,q)(3,0,1,0)");
464  test_for_zero(levi_civita(n, o, p, q)(3, 0, 1, 1),
465  "levi_civita(n,o,p,q)(3,0,1,1)");
466  test_for_zero(levi_civita(n, o, p, q)(3, 0, 1, 2) + 1,
467  "levi_civita(n,o,p,q)(3,0,1,2)");
468  test_for_zero(levi_civita(n, o, p, q)(3, 0, 1, 3),
469  "levi_civita(n,o,p,q)(3,0,1,3)");
470  test_for_zero(levi_civita(n, o, p, q)(3, 0, 2, 0),
471  "levi_civita(n,o,p,q)(3,0,2,0)");
472  test_for_zero(levi_civita(n, o, p, q)(3, 0, 2, 1) - 1,
473  "levi_civita(n,o,p,q)(3,0,2,1)");
474  test_for_zero(levi_civita(n, o, p, q)(3, 0, 2, 2),
475  "levi_civita(n,o,p,q)(3,0,2,2)");
476  test_for_zero(levi_civita(n, o, p, q)(3, 0, 2, 3),
477  "levi_civita(n,o,p,q)(3,0,2,3)");
478  test_for_zero(levi_civita(n, o, p, q)(3, 0, 3, 0),
479  "levi_civita(n,o,p,q)(3,0,3,0)");
480  test_for_zero(levi_civita(n, o, p, q)(3, 0, 3, 1),
481  "levi_civita(n,o,p,q)(3,0,3,1)");
482  test_for_zero(levi_civita(n, o, p, q)(3, 0, 3, 2),
483  "levi_civita(n,o,p,q)(3,0,3,2)");
484  test_for_zero(levi_civita(n, o, p, q)(3, 0, 3, 3),
485  "levi_civita(n,o,p,q)(3,0,3,3)");
486  test_for_zero(levi_civita(n, o, p, q)(3, 1, 0, 0),
487  "levi_civita(n,o,p,q)(3,1,0,0)");
488  test_for_zero(levi_civita(n, o, p, q)(3, 1, 0, 1),
489  "levi_civita(n,o,p,q)(3,1,0,1)");
490  test_for_zero(levi_civita(n, o, p, q)(3, 1, 0, 2) - 1,
491  "levi_civita(n,o,p,q)(3,1,0,2)");
492  test_for_zero(levi_civita(n, o, p, q)(3, 1, 0, 3),
493  "levi_civita(n,o,p,q)(3,1,0,3)");
494  test_for_zero(levi_civita(n, o, p, q)(3, 1, 1, 0),
495  "levi_civita(n,o,p,q)(3,1,1,0)");
496  test_for_zero(levi_civita(n, o, p, q)(3, 1, 1, 1),
497  "levi_civita(n,o,p,q)(3,1,1,1)");
498  test_for_zero(levi_civita(n, o, p, q)(3, 1, 1, 2),
499  "levi_civita(n,o,p,q)(3,1,1,2)");
500  test_for_zero(levi_civita(n, o, p, q)(3, 1, 1, 3),
501  "levi_civita(n,o,p,q)(3,1,1,3)");
502  test_for_zero(levi_civita(n, o, p, q)(3, 1, 2, 0) + 1,
503  "levi_civita(n,o,p,q)(3,1,2,0)");
504  test_for_zero(levi_civita(n, o, p, q)(3, 1, 2, 1),
505  "levi_civita(n,o,p,q)(3,1,2,1)");
506  test_for_zero(levi_civita(n, o, p, q)(3, 1, 2, 2),
507  "levi_civita(n,o,p,q)(3,1,2,2)");
508  test_for_zero(levi_civita(n, o, p, q)(3, 1, 2, 3),
509  "levi_civita(n,o,p,q)(3,1,2,3)");
510  test_for_zero(levi_civita(n, o, p, q)(3, 1, 3, 0),
511  "levi_civita(n,o,p,q)(3,1,3,0)");
512  test_for_zero(levi_civita(n, o, p, q)(3, 1, 3, 1),
513  "levi_civita(n,o,p,q)(3,1,3,1)");
514  test_for_zero(levi_civita(n, o, p, q)(3, 1, 3, 2),
515  "levi_civita(n,o,p,q)(3,1,3,2)");
516  test_for_zero(levi_civita(n, o, p, q)(3, 1, 3, 3),
517  "levi_civita(n,o,p,q)(3,1,3,3)");
518  test_for_zero(levi_civita(n, o, p, q)(3, 2, 0, 0),
519  "levi_civita(n,o,p,q)(3,2,0,0)");
520  test_for_zero(levi_civita(n, o, p, q)(3, 2, 0, 1) + 1,
521  "levi_civita(n,o,p,q)(3,2,0,1)");
522  test_for_zero(levi_civita(n, o, p, q)(3, 2, 0, 2),
523  "levi_civita(n,o,p,q)(3,2,0,2)");
524  test_for_zero(levi_civita(n, o, p, q)(3, 2, 0, 3),
525  "levi_civita(n,o,p,q)(3,2,0,3)");
526  test_for_zero(levi_civita(n, o, p, q)(3, 2, 1, 0) - 1,
527  "levi_civita(n,o,p,q)(3,2,1,0)");
528  test_for_zero(levi_civita(n, o, p, q)(3, 2, 1, 1),
529  "levi_civita(n,o,p,q)(3,2,1,1)");
530  test_for_zero(levi_civita(n, o, p, q)(3, 2, 1, 2),
531  "levi_civita(n,o,p,q)(3,2,1,2)");
532  test_for_zero(levi_civita(n, o, p, q)(3, 2, 1, 3),
533  "levi_civita(n,o,p,q)(3,2,1,3)");
534  test_for_zero(levi_civita(n, o, p, q)(3, 2, 2, 0),
535  "levi_civita(n,o,p,q)(3,2,2,0)");
536  test_for_zero(levi_civita(n, o, p, q)(3, 2, 2, 1),
537  "levi_civita(n,o,p,q)(3,2,2,1)");
538  test_for_zero(levi_civita(n, o, p, q)(3, 2, 2, 2),
539  "levi_civita(n,o,p,q)(3,2,2,2)");
540  test_for_zero(levi_civita(n, o, p, q)(3, 2, 2, 3),
541  "levi_civita(n,o,p,q)(3,2,2,3)");
542  test_for_zero(levi_civita(n, o, p, q)(3, 2, 3, 0),
543  "levi_civita(n,o,p,q)(3,2,3,0)");
544  test_for_zero(levi_civita(n, o, p, q)(3, 2, 3, 1),
545  "levi_civita(n,o,p,q)(3,2,3,1)");
546  test_for_zero(levi_civita(n, o, p, q)(3, 2, 3, 2),
547  "levi_civita(n,o,p,q)(3,2,3,2)");
548  test_for_zero(levi_civita(n, o, p, q)(3, 2, 3, 3),
549  "levi_civita(n,o,p,q)(3,2,3,3)");
550  test_for_zero(levi_civita(n, o, p, q)(3, 3, 0, 0),
551  "levi_civita(n,o,p,q)(3,3,0,0)");
552  test_for_zero(levi_civita(n, o, p, q)(3, 3, 0, 1),
553  "levi_civita(n,o,p,q)(3,3,0,1)");
554  test_for_zero(levi_civita(n, o, p, q)(3, 3, 0, 2),
555  "levi_civita(n,o,p,q)(3,3,0,2)");
556  test_for_zero(levi_civita(n, o, p, q)(3, 3, 0, 3),
557  "levi_civita(n,o,p,q)(3,3,0,3)");
558  test_for_zero(levi_civita(n, o, p, q)(3, 3, 1, 0),
559  "levi_civita(n,o,p,q)(3,3,1,0)");
560  test_for_zero(levi_civita(n, o, p, q)(3, 3, 1, 1),
561  "levi_civita(n,o,p,q)(3,3,1,1)");
562  test_for_zero(levi_civita(n, o, p, q)(3, 3, 1, 2),
563  "levi_civita(n,o,p,q)(3,3,1,2)");
564  test_for_zero(levi_civita(n, o, p, q)(3, 3, 1, 3),
565  "levi_civita(n,o,p,q)(3,3,1,3)");
566  test_for_zero(levi_civita(n, o, p, q)(3, 3, 2, 0),
567  "levi_civita(n,o,p,q)(3,3,2,0)");
568  test_for_zero(levi_civita(n, o, p, q)(3, 3, 2, 1),
569  "levi_civita(n,o,p,q)(3,3,2,1)");
570  test_for_zero(levi_civita(n, o, p, q)(3, 3, 2, 2),
571  "levi_civita(n,o,p,q)(3,3,2,2)");
572  test_for_zero(levi_civita(n, o, p, q)(3, 3, 2, 3),
573  "levi_civita(n,o,p,q)(3,3,2,3)");
574  test_for_zero(levi_civita(n, o, p, q)(3, 3, 3, 0),
575  "levi_civita(n,o,p,q)(3,3,3,0)");
576  test_for_zero(levi_civita(n, o, p, q)(3, 3, 3, 1),
577  "levi_civita(n,o,p,q)(3,3,3,1)");
578  test_for_zero(levi_civita(n, o, p, q)(3, 3, 3, 2),
579  "levi_civita(n,o,p,q)(3,3,3,2)");
580  test_for_zero(levi_civita(n, o, p, q)(3, 3, 3, 3),
581  "levi_civita(n,o,p,q)(3,3,3,3)");
582 }

◆ test_Levi_Civita_02()

void test_Levi_Civita_02 ( void  )

Definition at line 7 of file test_Levi_Civita_02.cpp.

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 }

◆ test_Levi_Civita_03()

void test_Levi_Civita_03 ( void  )

Definition at line 7 of file test_Levi_Civita_03.cpp.

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

◆ test_Levi_Civita_04()

void test_Levi_Civita_04 ( void  )

Definition at line 7 of file test_Levi_Civita_04.cpp.

8 {
9  Index<'o', 4> o;
10  Index<'p', 4> p;
11  Index<'q', 4> q;
12 
13  Number<0> N0;
14  Number<1> N1;
15  Number<2> N2;
16 
17  /* Test Levi_Civita Rank 4 */
18  test_for_zero(levi_civita(0, 0, 0, q)(0), "levi_civita(0,0,0,q)(0)");
19  test_for_zero(levi_civita(0, 0, 0, q)(1), "levi_civita(0,0,0,q)(1)");
20  test_for_zero(levi_civita(0, 0, 0, q)(2), "levi_civita(0,0,0,q)(2)");
21  test_for_zero(levi_civita(0, 0, 0, q)(3), "levi_civita(0,0,0,q)(3)");
22  test_for_zero(levi_civita(0, 0, 1, q)(0), "levi_civita(0,0,1,q)(0)");
23  test_for_zero(levi_civita(0, 0, 1, q)(1), "levi_civita(0,0,1,q)(1)");
24  test_for_zero(levi_civita(0, 0, 1, q)(2), "levi_civita(0,0,1,q)(2)");
25  test_for_zero(levi_civita(0, 0, 1, q)(3), "levi_civita(0,0,1,q)(3)");
26  test_for_zero(levi_civita(0, 0, 2, q)(0), "levi_civita(0,0,2,q)(0)");
27  test_for_zero(levi_civita(0, 0, 2, q)(1), "levi_civita(0,0,2,q)(1)");
28  test_for_zero(levi_civita(0, 0, 2, q)(2), "levi_civita(0,0,2,q)(2)");
29  test_for_zero(levi_civita(0, 0, 2, q)(3), "levi_civita(0,0,2,q)(3)");
30  test_for_zero(levi_civita(0, 0, 3, q)(0), "levi_civita(0,0,3,q)(0)");
31  test_for_zero(levi_civita(0, 0, 3, q)(1), "levi_civita(0,0,3,q)(1)");
32  test_for_zero(levi_civita(0, 0, 3, q)(2), "levi_civita(0,0,3,q)(2)");
33  test_for_zero(levi_civita(0, 0, 3, q)(3), "levi_civita(0,0,3,q)(3)");
34 
35  test_for_zero(levi_civita(0, 1, 0, q)(0), "levi_civita(0,1,0,q)(0)");
36  test_for_zero(levi_civita(0, 1, 0, q)(1), "levi_civita(0,1,0,q)(1)");
37  test_for_zero(levi_civita(0, 1, 0, q)(2), "levi_civita(0,1,0,q)(2)");
38  test_for_zero(levi_civita(0, 1, 0, q)(3), "levi_civita(0,1,0,q)(3)");
39  test_for_zero(levi_civita(0, 1, 1, q)(0), "levi_civita(0,1,1,q)(0)");
40  test_for_zero(levi_civita(0, 1, 1, q)(1), "levi_civita(0,1,1,q)(1)");
41  test_for_zero(levi_civita(0, 1, 1, q)(2), "levi_civita(0,1,1,q)(2)");
42  test_for_zero(levi_civita(0, 1, 1, q)(3), "levi_civita(0,1,1,q)(3)");
43  test_for_zero(levi_civita(0, 1, 2, q)(0), "levi_civita(0,1,2,q)(0)");
44  test_for_zero(levi_civita(0, 1, 2, q)(1), "levi_civita(0,1,2,q)(1)");
45  test_for_zero(levi_civita(0, 1, 2, q)(2), "levi_civita(0,1,2,q)(2)");
46  test_for_zero(levi_civita(0, 1, 2, q)(3) - 1, "levi_civita(0,1,2,q)(3)");
47  test_for_zero(levi_civita(0, 1, 3, q)(0), "levi_civita(0,1,3,q)(0)");
48  test_for_zero(levi_civita(0, 1, 3, q)(1), "levi_civita(0,1,3,q)(1)");
49  test_for_zero(levi_civita(0, 1, 3, q)(2) + 1, "levi_civita(0,1,3,q)(2)");
50  test_for_zero(levi_civita(0, 1, 3, q)(3), "levi_civita(0,1,3,q)(3)");
51 
52  test_for_zero(levi_civita(0, 2, 0, q)(0), "levi_civita(0,2,0,q)(0)");
53  test_for_zero(levi_civita(0, 2, 0, q)(1), "levi_civita(0,2,0,q)(1)");
54  test_for_zero(levi_civita(0, 2, 0, q)(2), "levi_civita(0,2,0,q)(2)");
55  test_for_zero(levi_civita(0, 2, 0, q)(3), "levi_civita(0,2,0,q)(3)");
56  test_for_zero(levi_civita(0, 2, 1, q)(0), "levi_civita(0,2,1,q)(0)");
57  test_for_zero(levi_civita(0, 2, 1, q)(1), "levi_civita(0,2,1,q)(1)");
58  test_for_zero(levi_civita(0, 2, 1, q)(2), "levi_civita(0,2,1,q)(2)");
59  test_for_zero(levi_civita(0, 2, 1, q)(3) + 1, "levi_civita(0,2,1,q)(3)");
60  test_for_zero(levi_civita(0, 2, 2, q)(0), "levi_civita(0,2,2,q)(0)");
61  test_for_zero(levi_civita(0, 2, 2, q)(1), "levi_civita(0,2,2,q)(1)");
62  test_for_zero(levi_civita(0, 2, 2, q)(2), "levi_civita(0,2,2,q)(2)");
63  test_for_zero(levi_civita(0, 2, 2, q)(3), "levi_civita(0,2,2,q)(3)");
64  test_for_zero(levi_civita(0, 2, 3, q)(0), "levi_civita(0,2,3,q)(0)");
65  test_for_zero(levi_civita(0, 2, 3, q)(1) - 1, "levi_civita(0,2,3,q)(1)");
66  test_for_zero(levi_civita(0, 2, 3, q)(2), "levi_civita(0,2,3,q)(2)");
67  test_for_zero(levi_civita(0, 2, 3, q)(3), "levi_civita(0,2,3,q)(3)");
68 
69  test_for_zero(levi_civita(0, 3, 0, q)(0), "levi_civita(0,3,0,q)(0)");
70  test_for_zero(levi_civita(0, 3, 0, q)(1), "levi_civita(0,3,0,q)(1)");
71  test_for_zero(levi_civita(0, 3, 0, q)(2), "levi_civita(0,3,0,q)(2)");
72  test_for_zero(levi_civita(0, 3, 0, q)(3), "levi_civita(0,3,0,q)(3)");
73  test_for_zero(levi_civita(0, 3, 1, q)(0), "levi_civita(0,3,1,q)(0)");
74  test_for_zero(levi_civita(0, 3, 1, q)(1), "levi_civita(0,3,1,q)(1)");
75  test_for_zero(levi_civita(0, 3, 1, q)(2) - 1, "levi_civita(0,3,1,q)(2)");
76  test_for_zero(levi_civita(0, 3, 1, q)(3), "levi_civita(0,3,1,q)(3)");
77  test_for_zero(levi_civita(0, 3, 2, q)(0), "levi_civita(0,3,2,q)(0)");
78  test_for_zero(levi_civita(0, 3, 2, q)(1) + 1, "levi_civita(0,3,2,q)(1)");
79  test_for_zero(levi_civita(0, 3, 2, q)(2), "levi_civita(0,3,2,q)(2)");
80  test_for_zero(levi_civita(0, 3, 2, q)(3), "levi_civita(0,3,2,q)(3)");
81  test_for_zero(levi_civita(0, 3, 3, q)(0), "levi_civita(0,3,3,q)(0)");
82  test_for_zero(levi_civita(0, 3, 3, q)(1), "levi_civita(0,3,3,q)(1)");
83  test_for_zero(levi_civita(0, 3, 3, q)(2), "levi_civita(0,3,3,q)(2)");
84  test_for_zero(levi_civita(0, 3, 3, q)(3), "levi_civita(0,3,3,q)(3)");
85 
86  test_for_zero(levi_civita(1, 0, 0, q)(0), "levi_civita(1,0,0,q)(0)");
87  test_for_zero(levi_civita(1, 0, 0, q)(1), "levi_civita(1,0,0,q)(1)");
88  test_for_zero(levi_civita(1, 0, 0, q)(2), "levi_civita(1,0,0,q)(2)");
89  test_for_zero(levi_civita(1, 0, 0, q)(3), "levi_civita(1,0,0,q)(3)");
90  test_for_zero(levi_civita(1, 0, 1, q)(0), "levi_civita(1,0,1,q)(0)");
91  test_for_zero(levi_civita(1, 0, 1, q)(1), "levi_civita(1,0,1,q)(1)");
92  test_for_zero(levi_civita(1, 0, 1, q)(2), "levi_civita(1,0,1,q)(2)");
93  test_for_zero(levi_civita(1, 0, 1, q)(3), "levi_civita(1,0,1,q)(3)");
94  test_for_zero(levi_civita(1, 0, 2, q)(0), "levi_civita(1,0,2,q)(0)");
95  test_for_zero(levi_civita(1, 0, 2, q)(1), "levi_civita(1,0,2,q)(1)");
96  test_for_zero(levi_civita(1, 0, 2, q)(2), "levi_civita(1,0,2,q)(2)");
97  test_for_zero(levi_civita(1, 0, 2, q)(3) + 1, "levi_civita(1,0,2,q)(3)");
98  test_for_zero(levi_civita(1, 0, 3, q)(0), "levi_civita(1,0,3,q)(0)");
99  test_for_zero(levi_civita(1, 0, 3, q)(1), "levi_civita(1,0,3,q)(1)");
100  test_for_zero(levi_civita(1, 0, 3, q)(2) - 1, "levi_civita(1,0,3,q)(2)");
101  test_for_zero(levi_civita(1, 0, 3, q)(3), "levi_civita(1,0,3,q)(3)");
102 
103  test_for_zero(levi_civita(1, 1, 0, q)(0), "levi_civita(1,1,0,q)(0)");
104  test_for_zero(levi_civita(1, 1, 0, q)(1), "levi_civita(1,1,0,q)(1)");
105  test_for_zero(levi_civita(1, 1, 0, q)(2), "levi_civita(1,1,0,q)(2)");
106  test_for_zero(levi_civita(1, 1, 0, q)(3), "levi_civita(1,1,0,q)(3)");
107  test_for_zero(levi_civita(1, 1, 1, q)(0), "levi_civita(1,1,1,q)(0)");
108  test_for_zero(levi_civita(1, 1, 1, q)(1), "levi_civita(1,1,1,q)(1)");
109  test_for_zero(levi_civita(1, 1, 1, q)(2), "levi_civita(1,1,1,q)(2)");
110  test_for_zero(levi_civita(1, 1, 1, q)(3), "levi_civita(1,1,1,q)(3)");
111  test_for_zero(levi_civita(1, 1, 2, q)(0), "levi_civita(1,1,2,q)(0)");
112  test_for_zero(levi_civita(1, 1, 2, q)(1), "levi_civita(1,1,2,q)(1)");
113  test_for_zero(levi_civita(1, 1, 2, q)(2), "levi_civita(1,1,2,q)(2)");
114  test_for_zero(levi_civita(1, 1, 2, q)(3), "levi_civita(1,1,2,q)(3)");
115  test_for_zero(levi_civita(1, 1, 3, q)(0), "levi_civita(1,1,3,q)(0)");
116  test_for_zero(levi_civita(1, 1, 3, q)(1), "levi_civita(1,1,3,q)(1)");
117  test_for_zero(levi_civita(1, 1, 3, q)(2), "levi_civita(1,1,3,q)(2)");
118  test_for_zero(levi_civita(1, 1, 3, q)(3), "levi_civita(1,1,3,q)(3)");
119 
120  test_for_zero(levi_civita(1, 2, 0, q)(0), "levi_civita(1,2,0,q)(0)");
121  test_for_zero(levi_civita(1, 2, 0, q)(1), "levi_civita(1,2,0,q)(1)");
122  test_for_zero(levi_civita(1, 2, 0, q)(2), "levi_civita(1,2,0,q)(2)");
123  test_for_zero(levi_civita(1, 2, 0, q)(3) - 1, "levi_civita(1,2,0,q)(3)");
124  test_for_zero(levi_civita(1, 2, 1, q)(0), "levi_civita(1,2,1,q)(0)");
125  test_for_zero(levi_civita(1, 2, 1, q)(1), "levi_civita(1,2,1,q)(1)");
126  test_for_zero(levi_civita(1, 2, 1, q)(2), "levi_civita(1,2,1,q)(2)");
127  test_for_zero(levi_civita(1, 2, 1, q)(3), "levi_civita(1,2,1,q)(3)");
128  test_for_zero(levi_civita(1, 2, 2, q)(0), "levi_civita(1,2,2,q)(0)");
129  test_for_zero(levi_civita(1, 2, 2, q)(1), "levi_civita(1,2,2,q)(1)");
130  test_for_zero(levi_civita(1, 2, 2, q)(2), "levi_civita(1,2,2,q)(2)");
131  test_for_zero(levi_civita(1, 2, 2, q)(3), "levi_civita(1,2,2,q)(3)");
132  test_for_zero(levi_civita(1, 2, 3, q)(0) + 1, "levi_civita(1,2,3,q)(0)");
133  test_for_zero(levi_civita(1, 2, 3, q)(1), "levi_civita(1,2,3,q)(1)");
134  test_for_zero(levi_civita(1, 2, 3, q)(2), "levi_civita(1,2,3,q)(2)");
135  test_for_zero(levi_civita(1, 2, 3, q)(3), "levi_civita(1,2,3,q)(3)");
136 
137  test_for_zero(levi_civita(1, 3, 0, q)(0), "levi_civita(1,3,0,q)(0)");
138  test_for_zero(levi_civita(1, 3, 0, q)(1), "levi_civita(1,3,0,q)(1)");
139  test_for_zero(levi_civita(1, 3, 0, q)(2) + 1, "levi_civita(1,3,0,q)(2)");
140  test_for_zero(levi_civita(1, 3, 0, q)(3), "levi_civita(1,3,0,q)(3)");
141  test_for_zero(levi_civita(1, 3, 1, q)(0), "levi_civita(1,3,1,q)(0)");
142  test_for_zero(levi_civita(1, 3, 1, q)(1), "levi_civita(1,3,1,q)(1)");
143  test_for_zero(levi_civita(1, 3, 1, q)(2), "levi_civita(1,3,1,q)(2)");
144  test_for_zero(levi_civita(1, 3, 1, q)(3), "levi_civita(1,3,1,q)(3)");
145  test_for_zero(levi_civita(1, 3, 2, q)(0) - 1, "levi_civita(1,3,2,q)(0)");
146  test_for_zero(levi_civita(1, 3, 2, q)(1), "levi_civita(1,3,2,q)(1)");
147  test_for_zero(levi_civita(1, 3, 2, q)(2), "levi_civita(1,3,2,q)(2)");
148  test_for_zero(levi_civita(1, 3, 2, q)(3), "levi_civita(1,3,2,q)(3)");
149  test_for_zero(levi_civita(1, 3, 3, q)(0), "levi_civita(1,3,3,q)(0)");
150  test_for_zero(levi_civita(1, 3, 3, q)(1), "levi_civita(1,3,3,q)(1)");
151  test_for_zero(levi_civita(1, 3, 3, q)(2), "levi_civita(1,3,3,q)(2)");
152  test_for_zero(levi_civita(1, 3, 3, q)(3), "levi_civita(1,3,3,q)(3)");
153 
154  test_for_zero(levi_civita(2, 0, 0, q)(0), "levi_civita(2,0,0,q)(0)");
155  test_for_zero(levi_civita(2, 0, 0, q)(1), "levi_civita(2,0,0,q)(1)");
156  test_for_zero(levi_civita(2, 0, 0, q)(2), "levi_civita(2,0,0,q)(2)");
157  test_for_zero(levi_civita(2, 0, 0, q)(3), "levi_civita(2,0,0,q)(3)");
158  test_for_zero(levi_civita(2, 0, 1, q)(0), "levi_civita(2,0,1,q)(0)");
159  test_for_zero(levi_civita(2, 0, 1, q)(1), "levi_civita(2,0,1,q)(1)");
160  test_for_zero(levi_civita(2, 0, 1, q)(2), "levi_civita(2,0,1,q)(2)");
161  test_for_zero(levi_civita(2, 0, 1, q)(3) - 1, "levi_civita(2,0,1,q)(3)");
162  test_for_zero(levi_civita(2, 0, 2, q)(0), "levi_civita(2,0,2,q)(0)");
163  test_for_zero(levi_civita(2, 0, 2, q)(1), "levi_civita(2,0,2,q)(1)");
164  test_for_zero(levi_civita(2, 0, 2, q)(2), "levi_civita(2,0,2,q)(2)");
165  test_for_zero(levi_civita(2, 0, 2, q)(3), "levi_civita(2,0,2,q)(3)");
166  test_for_zero(levi_civita(2, 0, 3, q)(0), "levi_civita(2,0,3,q)(0)");
167  test_for_zero(levi_civita(2, 0, 3, q)(1) + 1, "levi_civita(2,0,3,q)(1)");
168  test_for_zero(levi_civita(2, 0, 3, q)(2), "levi_civita(2,0,3,q)(2)");
169  test_for_zero(levi_civita(2, 0, 3, q)(3), "levi_civita(2,0,3,q)(3)");
170 
171  test_for_zero(levi_civita(2, 1, 0, q)(0), "levi_civita(2,1,0,q)(0)");
172  test_for_zero(levi_civita(2, 1, 0, q)(1), "levi_civita(2,1,0,q)(1)");
173  test_for_zero(levi_civita(2, 1, 0, q)(2), "levi_civita(2,1,0,q)(2)");
174  test_for_zero(levi_civita(2, 1, 0, q)(3) + 1, "levi_civita(2,1,0,q)(3)");
175  test_for_zero(levi_civita(2, 1, 1, q)(0), "levi_civita(2,1,1,q)(0)");
176  test_for_zero(levi_civita(2, 1, 1, q)(1), "levi_civita(2,1,1,q)(1)");
177  test_for_zero(levi_civita(2, 1, 1, q)(2), "levi_civita(2,1,1,q)(2)");
178  test_for_zero(levi_civita(2, 1, 1, q)(3), "levi_civita(2,1,1,q)(3)");
179  test_for_zero(levi_civita(2, 1, 2, q)(0), "levi_civita(2,1,2,q)(0)");
180  test_for_zero(levi_civita(2, 1, 2, q)(1), "levi_civita(2,1,2,q)(1)");
181  test_for_zero(levi_civita(2, 1, 2, q)(2), "levi_civita(2,1,2,q)(2)");
182  test_for_zero(levi_civita(2, 1, 2, q)(3), "levi_civita(2,1,2,q)(3)");
183  test_for_zero(levi_civita(2, 1, 3, q)(0) - 1, "levi_civita(2,1,3,q)(0)");
184  test_for_zero(levi_civita(2, 1, 3, q)(1), "levi_civita(2,1,3,q)(1)");
185  test_for_zero(levi_civita(2, 1, 3, q)(2), "levi_civita(2,1,3,q)(2)");
186  test_for_zero(levi_civita(2, 1, 3, q)(3), "levi_civita(2,1,3,q)(3)");
187 
188  test_for_zero(levi_civita(2, 2, 0, q)(0), "levi_civita(2,2,0,q)(0)");
189  test_for_zero(levi_civita(2, 2, 0, q)(1), "levi_civita(2,2,0,q)(1)");
190  test_for_zero(levi_civita(2, 2, 0, q)(2), "levi_civita(2,2,0,q)(2)");
191  test_for_zero(levi_civita(2, 2, 0, q)(3), "levi_civita(2,2,0,q)(3)");
192  test_for_zero(levi_civita(2, 2, 1, q)(0), "levi_civita(2,2,1,q)(0)");
193  test_for_zero(levi_civita(2, 2, 1, q)(1), "levi_civita(2,2,1,q)(1)");
194  test_for_zero(levi_civita(2, 2, 1, q)(2), "levi_civita(2,2,1,q)(2)");
195  test_for_zero(levi_civita(2, 2, 1, q)(3), "levi_civita(2,2,1,q)(3)");
196  test_for_zero(levi_civita(2, 2, 2, q)(0), "levi_civita(2,2,2,q)(0)");
197  test_for_zero(levi_civita(2, 2, 2, q)(1), "levi_civita(2,2,2,q)(1)");
198  test_for_zero(levi_civita(2, 2, 2, q)(2), "levi_civita(2,2,2,q)(2)");
199  test_for_zero(levi_civita(2, 2, 2, q)(3), "levi_civita(2,2,2,q)(3)");
200  test_for_zero(levi_civita(2, 2, 3, q)(0), "levi_civita(2,2,3,q)(0)");
201  test_for_zero(levi_civita(2, 2, 3, q)(1), "levi_civita(2,2,3,q)(1)");
202  test_for_zero(levi_civita(2, 2, 3, q)(2), "levi_civita(2,2,3,q)(2)");
203  test_for_zero(levi_civita(2, 2, 3, q)(3), "levi_civita(2,2,3,q)(3)");
204 
205  test_for_zero(levi_civita(2, 3, 0, q)(0), "levi_civita(2,3,0,q)(0)");
206  test_for_zero(levi_civita(2, 3, 0, q)(1) - 1, "levi_civita(2,3,0,q)(1)");
207  test_for_zero(levi_civita(2, 3, 0, q)(2), "levi_civita(2,3,0,q)(2)");
208  test_for_zero(levi_civita(2, 3, 0, q)(3), "levi_civita(2,3,0,q)(3)");
209  test_for_zero(levi_civita(2, 3, 1, q)(0) + 1, "levi_civita(2,3,1,q)(0)");
210  test_for_zero(levi_civita(2, 3, 1, q)(1), "levi_civita(2,3,1,q)(1)");
211  test_for_zero(levi_civita(2, 3, 1, q)(2), "levi_civita(2,3,1,q)(2)");
212  test_for_zero(levi_civita(2, 3, 1, q)(3), "levi_civita(2,3,1,q)(3)");
213  test_for_zero(levi_civita(2, 3, 2, q)(0), "levi_civita(2,3,2,q)(0)");
214  test_for_zero(levi_civita(2, 3, 2, q)(1), "levi_civita(2,3,2,q)(1)");
215  test_for_zero(levi_civita(2, 3, 2, q)(2), "levi_civita(2,3,2,q)(2)");
216  test_for_zero(levi_civita(2, 3, 2, q)(3), "levi_civita(2,3,2,q)(3)");
217  test_for_zero(levi_civita(2, 3, 3, q)(0), "levi_civita(2,3,3,q)(0)");
218  test_for_zero(levi_civita(2, 3, 3, q)(1), "levi_civita(2,3,3,q)(1)");
219  test_for_zero(levi_civita(2, 3, 3, q)(2), "levi_civita(2,3,3,q)(2)");
220  test_for_zero(levi_civita(2, 3, 3, q)(3), "levi_civita(2,3,3,q)(3)");
221 
222  test_for_zero(levi_civita(3, 0, 0, q)(0), "levi_civita(3,0,0,q)(0)");
223  test_for_zero(levi_civita(3, 0, 0, q)(1), "levi_civita(3,0,0,q)(1)");
224  test_for_zero(levi_civita(3, 0, 0, q)(2), "levi_civita(3,0,0,q)(2)");
225  test_for_zero(levi_civita(3, 0, 0, q)(3), "levi_civita(3,0,0,q)(3)");
226  test_for_zero(levi_civita(3, 0, 1, q)(0), "levi_civita(3,0,1,q)(0)");
227  test_for_zero(levi_civita(3, 0, 1, q)(1), "levi_civita(3,0,1,q)(1)");
228  test_for_zero(levi_civita(3, 0, 1, q)(2) + 1, "levi_civita(3,0,1,q)(2)");
229  test_for_zero(levi_civita(3, 0, 1, q)(3), "levi_civita(3,0,1,q)(3)");
230  test_for_zero(levi_civita(3, 0, 2, q)(0), "levi_civita(3,0,2,q)(0)");
231  test_for_zero(levi_civita(3, 0, 2, q)(1) - 1, "levi_civita(3,0,2,q)(1)");
232  test_for_zero(levi_civita(3, 0, 2, q)(2), "levi_civita(3,0,2,q)(2)");
233  test_for_zero(levi_civita(3, 0, 2, q)(3), "levi_civita(3,0,2,q)(3)");
234  test_for_zero(levi_civita(3, 0, 3, q)(0), "levi_civita(3,0,3,q)(0)");
235  test_for_zero(levi_civita(3, 0, 3, q)(1), "levi_civita(3,0,3,q)(1)");
236  test_for_zero(levi_civita(3, 0, 3, q)(2), "levi_civita(3,0,3,q)(2)");
237  test_for_zero(levi_civita(3, 0, 3, q)(3), "levi_civita(3,0,3,q)(3)");
238 
239  test_for_zero(levi_civita(3, 1, 0, q)(0), "levi_civita(3,1,0,q)(0)");
240  test_for_zero(levi_civita(3, 1, 0, q)(1), "levi_civita(3,1,0,q)(1)");
241  test_for_zero(levi_civita(3, 1, 0, q)(2) - 1, "levi_civita(3,1,0,q)(2)");
242  test_for_zero(levi_civita(3, 1, 0, q)(3), "levi_civita(3,1,0,q)(3)");
243  test_for_zero(levi_civita(3, 1, 1, q)(0), "levi_civita(3,1,1,q)(0)");
244  test_for_zero(levi_civita(3, 1, 1, q)(1), "levi_civita(3,1,1,q)(1)");
245  test_for_zero(levi_civita(3, 1, 1, q)(2), "levi_civita(3,1,1,q)(2)");
246  test_for_zero(levi_civita(3, 1, 1, q)(3), "levi_civita(3,1,1,q)(3)");
247  test_for_zero(levi_civita(3, 1, 2, q)(0) + 1, "levi_civita(3,1,2,q)(0)");
248  test_for_zero(levi_civita(3, 1, 2, q)(1), "levi_civita(3,1,2,q)(1)");
249  test_for_zero(levi_civita(3, 1, 2, q)(2), "levi_civita(3,1,2,q)(2)");
250  test_for_zero(levi_civita(3, 1, 2, q)(3), "levi_civita(3,1,2,q)(3)");
251  test_for_zero(levi_civita(3, 1, 3, q)(0), "levi_civita(3,1,3,q)(0)");
252  test_for_zero(levi_civita(3, 1, 3, q)(1), "levi_civita(3,1,3,q)(1)");
253  test_for_zero(levi_civita(3, 1, 3, q)(2), "levi_civita(3,1,3,q)(2)");
254  test_for_zero(levi_civita(3, 1, 3, q)(3), "levi_civita(3,1,3,q)(3)");
255 
256  test_for_zero(levi_civita(3, 2, 0, q)(0), "levi_civita(3,2,0,q)(0)");
257  test_for_zero(levi_civita(3, 2, 0, q)(1) + 1, "levi_civita(3,2,0,q)(1)");
258  test_for_zero(levi_civita(3, 2, 0, q)(2), "levi_civita(3,2,0,q)(2)");
259  test_for_zero(levi_civita(3, 2, 0, q)(3), "levi_civita(3,2,0,q)(3)");
260  test_for_zero(levi_civita(3, 2, 1, q)(0) - 1, "levi_civita(3,2,1,q)(0)");
261  test_for_zero(levi_civita(3, 2, 1, q)(1), "levi_civita(3,2,1,q)(1)");
262  test_for_zero(levi_civita(3, 2, 1, q)(2), "levi_civita(3,2,1,q)(2)");
263  test_for_zero(levi_civita(3, 2, 1, q)(3), "levi_civita(3,2,1,q)(3)");
264  test_for_zero(levi_civita(3, 2, 2, q)(0), "levi_civita(3,2,2,q)(0)");
265  test_for_zero(levi_civita(3, 2, 2, q)(1), "levi_civita(3,2,2,q)(1)");
266  test_for_zero(levi_civita(3, 2, 2, q)(2), "levi_civita(3,2,2,q)(2)");
267  test_for_zero(levi_civita(3, 2, 2, q)(3), "levi_civita(3,2,2,q)(3)");
268  test_for_zero(levi_civita(3, 2, 3, q)(0), "levi_civita(3,2,3,q)(0)");
269  test_for_zero(levi_civita(3, 2, 3, q)(1), "levi_civita(3,2,3,q)(1)");
270  test_for_zero(levi_civita(3, 2, 3, q)(2), "levi_civita(3,2,3,q)(2)");
271  test_for_zero(levi_civita(3, 2, 3, q)(3), "levi_civita(3,2,3,q)(3)");
272 
273  test_for_zero(levi_civita(3, 3, 0, q)(0), "levi_civita(3,3,0,q)(0)");
274  test_for_zero(levi_civita(3, 3, 0, q)(1), "levi_civita(3,3,0,q)(1)");
275  test_for_zero(levi_civita(3, 3, 0, q)(2), "levi_civita(3,3,0,q)(2)");
276  test_for_zero(levi_civita(3, 3, 0, q)(3), "levi_civita(3,3,0,q)(3)");
277  test_for_zero(levi_civita(3, 3, 1, q)(0), "levi_civita(3,3,1,q)(0)");
278  test_for_zero(levi_civita(3, 3, 1, q)(1), "levi_civita(3,3,1,q)(1)");
279  test_for_zero(levi_civita(3, 3, 1, q)(2), "levi_civita(3,3,1,q)(2)");
280  test_for_zero(levi_civita(3, 3, 1, q)(3), "levi_civita(3,3,1,q)(3)");
281  test_for_zero(levi_civita(3, 3, 2, q)(0), "levi_civita(3,3,2,q)(0)");
282  test_for_zero(levi_civita(3, 3, 2, q)(1), "levi_civita(3,3,2,q)(1)");
283  test_for_zero(levi_civita(3, 3, 2, q)(2), "levi_civita(3,3,2,q)(2)");
284  test_for_zero(levi_civita(3, 3, 2, q)(3), "levi_civita(3,3,2,q)(3)");
285  test_for_zero(levi_civita(3, 3, 3, q)(0), "levi_civita(3,3,3,q)(0)");
286  test_for_zero(levi_civita(3, 3, 3, q)(1), "levi_civita(3,3,3,q)(1)");
287  test_for_zero(levi_civita(3, 3, 3, q)(2), "levi_civita(3,3,3,q)(2)");
288  test_for_zero(levi_civita(3, 3, 3, q)(3), "levi_civita(3,3,3,q)(3)");
289 
290  test_for_zero(levi_civita(0, 0, p, 0)(0), "levi_civita(0,0,p,0)(0)");
291  test_for_zero(levi_civita(0, 0, p, 0)(1), "levi_civita(0,0,p,0)(1)");
292  test_for_zero(levi_civita(0, 0, p, 0)(2), "levi_civita(0,0,p,0)(2)");
293  test_for_zero(levi_civita(0, 0, p, 0)(3), "levi_civita(0,0,p,0)(3)");
294  test_for_zero(levi_civita(0, 0, p, 1)(0), "levi_civita(0,0,p,1)(0)");
295  test_for_zero(levi_civita(0, 0, p, 1)(1), "levi_civita(0,0,p,1)(1)");
296  test_for_zero(levi_civita(0, 0, p, 1)(2), "levi_civita(0,0,p,1)(2)");
297  test_for_zero(levi_civita(0, 0, p, 1)(3), "levi_civita(0,0,p,1)(3)");
298  test_for_zero(levi_civita(0, 0, p, 2)(0), "levi_civita(0,0,p,2)(0)");
299  test_for_zero(levi_civita(0, 0, p, 2)(1), "levi_civita(0,0,p,2)(1)");
300  test_for_zero(levi_civita(0, 0, p, 2)(2), "levi_civita(0,0,p,2)(2)");
301  test_for_zero(levi_civita(0, 0, p, 2)(3), "levi_civita(0,0,p,2)(3)");
302  test_for_zero(levi_civita(0, 0, p, 3)(0), "levi_civita(0,0,p,3)(0)");
303  test_for_zero(levi_civita(0, 0, p, 3)(1), "levi_civita(0,0,p,3)(1)");
304  test_for_zero(levi_civita(0, 0, p, 3)(2), "levi_civita(0,0,p,3)(2)");
305  test_for_zero(levi_civita(0, 0, p, 3)(3), "levi_civita(0,0,p,3)(3)");
306 
307  test_for_zero(levi_civita(0, 1, p, 0)(0), "levi_civita(0,1,p,0)(0)");
308  test_for_zero(levi_civita(0, 1, p, 0)(1), "levi_civita(0,1,p,0)(1)");
309  test_for_zero(levi_civita(0, 1, p, 0)(2), "levi_civita(0,1,p,0)(2)");
310  test_for_zero(levi_civita(0, 1, p, 0)(3), "levi_civita(0,1,p,0)(3)");
311  test_for_zero(levi_civita(0, 1, p, 1)(0), "levi_civita(0,1,p,1)(0)");
312  test_for_zero(levi_civita(0, 1, p, 1)(1), "levi_civita(0,1,p,1)(1)");
313  test_for_zero(levi_civita(0, 1, p, 1)(2), "levi_civita(0,1,p,1)(2)");
314  test_for_zero(levi_civita(0, 1, p, 1)(3), "levi_civita(0,1,p,1)(3)");
315  test_for_zero(levi_civita(0, 1, p, 2)(0), "levi_civita(0,1,p,2)(0)");
316  test_for_zero(levi_civita(0, 1, p, 2)(1), "levi_civita(0,1,p,2)(1)");
317  test_for_zero(levi_civita(0, 1, p, 2)(2), "levi_civita(0,1,p,2)(2)");
318  test_for_zero(levi_civita(0, 1, p, 2)(3) + 1, "levi_civita(0,1,p,2)(3)");
319  test_for_zero(levi_civita(0, 1, p, 3)(0), "levi_civita(0,1,p,3)(0)");
320  test_for_zero(levi_civita(0, 1, p, 3)(1), "levi_civita(0,1,p,3)(1)");
321  test_for_zero(levi_civita(0, 1, p, 3)(2) - 1, "levi_civita(0,1,p,3)(2)");
322  test_for_zero(levi_civita(0, 1, p, 3)(3), "levi_civita(0,1,p,3)(3)");
323 
324  test_for_zero(levi_civita(0, 2, p, 0)(0), "levi_civita(0,2,p,0)(0)");
325  test_for_zero(levi_civita(0, 2, p, 0)(1), "levi_civita(0,2,p,0)(1)");
326  test_for_zero(levi_civita(0, 2, p, 0)(2), "levi_civita(0,2,p,0)(2)");
327  test_for_zero(levi_civita(0, 2, p, 0)(3), "levi_civita(0,2,p,0)(3)");
328  test_for_zero(levi_civita(0, 2, p, 1)(0), "levi_civita(0,2,p,1)(0)");
329  test_for_zero(levi_civita(0, 2, p, 1)(1), "levi_civita(0,2,p,1)(1)");
330  test_for_zero(levi_civita(0, 2, p, 1)(2), "levi_civita(0,2,p,1)(2)");
331  test_for_zero(levi_civita(0, 2, p, 1)(3) - 1, "levi_civita(0,2,p,1)(3)");
332  test_for_zero(levi_civita(0, 2, p, 2)(0), "levi_civita(0,2,p,2)(0)");
333  test_for_zero(levi_civita(0, 2, p, 2)(1), "levi_civita(0,2,p,2)(1)");
334  test_for_zero(levi_civita(0, 2, p, 2)(2), "levi_civita(0,2,p,2)(2)");
335  test_for_zero(levi_civita(0, 2, p, 2)(3), "levi_civita(0,2,p,2)(3)");
336  test_for_zero(levi_civita(0, 2, p, 3)(0), "levi_civita(0,2,p,3)(0)");
337  test_for_zero(levi_civita(0, 2, p, 3)(1) + 1, "levi_civita(0,2,p,3)(1)");
338  test_for_zero(levi_civita(0, 2, p, 3)(2), "levi_civita(0,2,p,3)(2)");
339  test_for_zero(levi_civita(0, 2, p, 3)(3), "levi_civita(0,2,p,3)(3)");
340 
341  test_for_zero(levi_civita(0, 3, p, 0)(0), "levi_civita(0,3,p,0)(0)");
342  test_for_zero(levi_civita(0, 3, p, 0)(1), "levi_civita(0,3,p,0)(1)");
343  test_for_zero(levi_civita(0, 3, p, 0)(2), "levi_civita(0,3,p,0)(2)");
344  test_for_zero(levi_civita(0, 3, p, 0)(3), "levi_civita(0,3,p,0)(3)");
345  test_for_zero(levi_civita(0, 3, p, 1)(0), "levi_civita(0,3,p,1)(0)");
346  test_for_zero(levi_civita(0, 3, p, 1)(1), "levi_civita(0,3,p,1)(1)");
347  test_for_zero(levi_civita(0, 3, p, 1)(2) + 1, "levi_civita(0,3,p,1)(2)");
348  test_for_zero(levi_civita(0, 3, p, 1)(3), "levi_civita(0,3,p,1)(3)");
349  test_for_zero(levi_civita(0, 3, p, 2)(0), "levi_civita(0,3,p,2)(0)");
350  test_for_zero(levi_civita(0, 3, p, 2)(1) - 1, "levi_civita(0,3,p,2)(1)");
351  test_for_zero(levi_civita(0, 3, p, 2)(2), "levi_civita(0,3,p,2)(2)");
352  test_for_zero(levi_civita(0, 3, p, 2)(3), "levi_civita(0,3,p,2)(3)");
353  test_for_zero(levi_civita(0, 3, p, 3)(0), "levi_civita(0,3,p,3)(0)");
354  test_for_zero(levi_civita(0, 3, p, 3)(1), "levi_civita(0,3,p,3)(1)");
355  test_for_zero(levi_civita(0, 3, p, 3)(2), "levi_civita(0,3,p,3)(2)");
356  test_for_zero(levi_civita(0, 3, p, 3)(3), "levi_civita(0,3,p,3)(3)");
357 
358  test_for_zero(levi_civita(1, 0, p, 0)(0), "levi_civita(1,0,p,0)(0)");
359  test_for_zero(levi_civita(1, 0, p, 0)(1), "levi_civita(1,0,p,0)(1)");
360  test_for_zero(levi_civita(1, 0, p, 0)(2), "levi_civita(1,0,p,0)(2)");
361  test_for_zero(levi_civita(1, 0, p, 0)(3), "levi_civita(1,0,p,0)(3)");
362  test_for_zero(levi_civita(1, 0, p, 1)(0), "levi_civita(1,0,p,1)(0)");
363  test_for_zero(levi_civita(1, 0, p, 1)(1), "levi_civita(1,0,p,1)(1)");
364  test_for_zero(levi_civita(1, 0, p, 1)(2), "levi_civita(1,0,p,1)(2)");
365  test_for_zero(levi_civita(1, 0, p, 1)(3), "levi_civita(1,0,p,1)(3)");
366  test_for_zero(levi_civita(1, 0, p, 2)(0), "levi_civita(1,0,p,2)(0)");
367  test_for_zero(levi_civita(1, 0, p, 2)(1), "levi_civita(1,0,p,2)(1)");
368  test_for_zero(levi_civita(1, 0, p, 2)(2), "levi_civita(1,0,p,2)(2)");
369  test_for_zero(levi_civita(1, 0, p, 2)(3) - 1, "levi_civita(1,0,p,2)(3)");
370  test_for_zero(levi_civita(1, 0, p, 3)(0), "levi_civita(1,0,p,3)(0)");
371  test_for_zero(levi_civita(1, 0, p, 3)(1), "levi_civita(1,0,p,3)(1)");
372  test_for_zero(levi_civita(1, 0, p, 3)(2) + 1, "levi_civita(1,0,p,3)(2)");
373  test_for_zero(levi_civita(1, 0, p, 3)(3), "levi_civita(1,0,p,3)(3)");
374 
375  test_for_zero(levi_civita(1, 1, p, 0)(0), "levi_civita(1,1,p,0)(0)");
376  test_for_zero(levi_civita(1, 1, p, 0)(1), "levi_civita(1,1,p,0)(1)");
377  test_for_zero(levi_civita(1, 1, p, 0)(2), "levi_civita(1,1,p,0)(2)");
378  test_for_zero(levi_civita(1, 1, p, 0)(3), "levi_civita(1,1,p,0)(3)");
379  test_for_zero(levi_civita(1, 1, p, 1)(0), "levi_civita(1,1,p,1)(0)");
380  test_for_zero(levi_civita(1, 1, p, 1)(1), "levi_civita(1,1,p,1)(1)");
381  test_for_zero(levi_civita(1, 1, p, 1)(2), "levi_civita(1,1,p,1)(2)");
382  test_for_zero(levi_civita(1, 1, p, 1)(3), "levi_civita(1,1,p,1)(3)");
383  test_for_zero(levi_civita(1, 1, p, 2)(0), "levi_civita(1,1,p,2)(0)");
384  test_for_zero(levi_civita(1, 1, p, 2)(1), "levi_civita(1,1,p,2)(1)");
385  test_for_zero(levi_civita(1, 1, p, 2)(2), "levi_civita(1,1,p,2)(2)");
386  test_for_zero(levi_civita(1, 1, p, 2)(3), "levi_civita(1,1,p,2)(3)");
387  test_for_zero(levi_civita(1, 1, p, 3)(0), "levi_civita(1,1,p,3)(0)");
388  test_for_zero(levi_civita(1, 1, p, 3)(1), "levi_civita(1,1,p,3)(1)");
389  test_for_zero(levi_civita(1, 1, p, 3)(2), "levi_civita(1,1,p,3)(2)");
390  test_for_zero(levi_civita(1, 1, p, 3)(3), "levi_civita(1,1,p,3)(3)");
391 
392  test_for_zero(levi_civita(1, 2, p, 0)(0), "levi_civita(1,2,p,0)(0)");
393  test_for_zero(levi_civita(1, 2, p, 0)(1), "levi_civita(1,2,p,0)(1)");
394  test_for_zero(levi_civita(1, 2, p, 0)(2), "levi_civita(1,2,p,0)(2)");
395  test_for_zero(levi_civita(1, 2, p, 0)(3) + 1, "levi_civita(1,2,p,0)(3)");
396  test_for_zero(levi_civita(1, 2, p, 1)(0), "levi_civita(1,2,p,1)(0)");
397  test_for_zero(levi_civita(1, 2, p, 1)(1), "levi_civita(1,2,p,1)(1)");
398  test_for_zero(levi_civita(1, 2, p, 1)(2), "levi_civita(1,2,p,1)(2)");
399  test_for_zero(levi_civita(1, 2, p, 1)(3), "levi_civita(1,2,p,1)(3)");
400  test_for_zero(levi_civita(1, 2, p, 2)(0), "levi_civita(1,2,p,2)(0)");
401  test_for_zero(levi_civita(1, 2, p, 2)(1), "levi_civita(1,2,p,2)(1)");
402  test_for_zero(levi_civita(1, 2, p, 2)(2), "levi_civita(1,2,p,2)(2)");
403  test_for_zero(levi_civita(1, 2, p, 2)(3), "levi_civita(1,2,p,2)(3)");
404  test_for_zero(levi_civita(1, 2, p, 3)(0) - 1, "levi_civita(1,2,p,3)(0)");
405  test_for_zero(levi_civita(1, 2, p, 3)(1), "levi_civita(1,2,p,3)(1)");
406  test_for_zero(levi_civita(1, 2, p, 3)(2), "levi_civita(1,2,p,3)(2)");
407  test_for_zero(levi_civita(1, 2, p, 3)(3), "levi_civita(1,2,p,3)(3)");
408 
409  test_for_zero(levi_civita(1, 3, p, 0)(0), "levi_civita(1,3,p,0)(0)");
410  test_for_zero(levi_civita(1, 3, p, 0)(1), "levi_civita(1,3,p,0)(1)");
411  test_for_zero(levi_civita(1, 3, p, 0)(2) - 1, "levi_civita(1,3,p,0)(2)");
412  test_for_zero(levi_civita(1, 3, p, 0)(3), "levi_civita(1,3,p,0)(3)");
413  test_for_zero(levi_civita(1, 3, p, 1)(0), "levi_civita(1,3,p,1)(0)");
414  test_for_zero(levi_civita(1, 3, p, 1)(1), "levi_civita(1,3,p,1)(1)");
415  test_for_zero(levi_civita(1, 3, p, 1)(2), "levi_civita(1,3,p,1)(2)");
416  test_for_zero(levi_civita(1, 3, p, 1)(3), "levi_civita(1,3,p,1)(3)");
417  test_for_zero(levi_civita(1, 3, p, 2)(0) + 1, "levi_civita(1,3,p,2)(0)");
418  test_for_zero(levi_civita(1, 3, p, 2)(1), "levi_civita(1,3,p,2)(1)");
419  test_for_zero(levi_civita(1, 3, p, 2)(2), "levi_civita(1,3,p,2)(2)");
420  test_for_zero(levi_civita(1, 3, p, 2)(3), "levi_civita(1,3,p,2)(3)");
421  test_for_zero(levi_civita(1, 3, p, 3)(0), "levi_civita(1,3,p,3)(0)");
422  test_for_zero(levi_civita(1, 3, p, 3)(1), "levi_civita(1,3,p,3)(1)");
423  test_for_zero(levi_civita(1, 3, p, 3)(2), "levi_civita(1,3,p,3)(2)");
424  test_for_zero(levi_civita(1, 3, p, 3)(3), "levi_civita(1,3,p,3)(3)");
425 
426  test_for_zero(levi_civita(2, 0, p, 0)(0), "levi_civita(2,0,p,0)(0)");
427  test_for_zero(levi_civita(2, 0, p, 0)(1), "levi_civita(2,0,p,0)(1)");
428  test_for_zero(levi_civita(2, 0, p, 0)(2), "levi_civita(2,0,p,0)(2)");
429  test_for_zero(levi_civita(2, 0, p, 0)(3), "levi_civita(2,0,p,0)(3)");
430  test_for_zero(levi_civita(2, 0, p, 1)(0), "levi_civita(2,0,p,1)(0)");
431  test_for_zero(levi_civita(2, 0, p, 1)(1), "levi_civita(2,0,p,1)(1)");
432  test_for_zero(levi_civita(2, 0, p, 1)(2), "levi_civita(2,0,p,1)(2)");
433  test_for_zero(levi_civita(2, 0, p, 1)(3) + 1, "levi_civita(2,0,p,1)(3)");
434  test_for_zero(levi_civita(2, 0, p, 2)(0), "levi_civita(2,0,p,2)(0)");
435  test_for_zero(levi_civita(2, 0, p, 2)(1), "levi_civita(2,0,p,2)(1)");
436  test_for_zero(levi_civita(2, 0, p, 2)(2), "levi_civita(2,0,p,2)(2)");
437  test_for_zero(levi_civita(2, 0, p, 2)(3), "levi_civita(2,0,p,2)(3)");
438  test_for_zero(levi_civita(2, 0, p, 3)(0), "levi_civita(2,0,p,3)(0)");
439  test_for_zero(levi_civita(2, 0, p, 3)(1) - 1, "levi_civita(2,0,p,3)(1)");
440  test_for_zero(levi_civita(2, 0, p, 3)(2), "levi_civita(2,0,p,3)(2)");
441  test_for_zero(levi_civita(2, 0, p, 3)(3), "levi_civita(2,0,p,3)(3)");
442 
443  test_for_zero(levi_civita(2, 1, p, 0)(0), "levi_civita(2,1,p,0)(0)");
444  test_for_zero(levi_civita(2, 1, p, 0)(1), "levi_civita(2,1,p,0)(1)");
445  test_for_zero(levi_civita(2, 1, p, 0)(2), "levi_civita(2,1,p,0)(2)");
446  test_for_zero(levi_civita(2, 1, p, 0)(3) - 1, "levi_civita(2,1,p,0)(3)");
447  test_for_zero(levi_civita(2, 1, p, 1)(0), "levi_civita(2,1,p,1)(0)");
448  test_for_zero(levi_civita(2, 1, p, 1)(1), "levi_civita(2,1,p,1)(1)");
449  test_for_zero(levi_civita(2, 1, p, 1)(2), "levi_civita(2,1,p,1)(2)");
450  test_for_zero(levi_civita(2, 1, p, 1)(3), "levi_civita(2,1,p,1)(3)");
451  test_for_zero(levi_civita(2, 1, p, 2)(0), "levi_civita(2,1,p,2)(0)");
452  test_for_zero(levi_civita(2, 1, p, 2)(1), "levi_civita(2,1,p,2)(1)");
453  test_for_zero(levi_civita(2, 1, p, 2)(2), "levi_civita(2,1,p,2)(2)");
454  test_for_zero(levi_civita(2, 1, p, 2)(3), "levi_civita(2,1,p,2)(3)");
455  test_for_zero(levi_civita(2, 1, p, 3)(0) + 1, "levi_civita(2,1,p,3)(0)");
456  test_for_zero(levi_civita(2, 1, p, 3)(1), "levi_civita(2,1,p,3)(1)");
457  test_for_zero(levi_civita(2, 1, p, 3)(2), "levi_civita(2,1,p,3)(2)");
458  test_for_zero(levi_civita(2, 1, p, 3)(3), "levi_civita(2,1,p,3)(3)");
459 
460  test_for_zero(levi_civita(2, 2, p, 0)(0), "levi_civita(2,2,p,0)(0)");
461  test_for_zero(levi_civita(2, 2, p, 0)(1), "levi_civita(2,2,p,0)(1)");
462  test_for_zero(levi_civita(2, 2, p, 0)(2), "levi_civita(2,2,p,0)(2)");
463  test_for_zero(levi_civita(2, 2, p, 0)(3), "levi_civita(2,2,p,0)(3)");
464  test_for_zero(levi_civita(2, 2, p, 1)(0), "levi_civita(2,2,p,1)(0)");
465  test_for_zero(levi_civita(2, 2, p, 1)(1), "levi_civita(2,2,p,1)(1)");
466  test_for_zero(levi_civita(2, 2, p, 1)(2), "levi_civita(2,2,p,1)(2)");
467  test_for_zero(levi_civita(2, 2, p, 1)(3), "levi_civita(2,2,p,1)(3)");
468  test_for_zero(levi_civita(2, 2, p, 2)(0), "levi_civita(2,2,p,2)(0)");
469  test_for_zero(levi_civita(2, 2, p, 2)(1), "levi_civita(2,2,p,2)(1)");
470  test_for_zero(levi_civita(2, 2, p, 2)(2), "levi_civita(2,2,p,2)(2)");
471  test_for_zero(levi_civita(2, 2, p, 2)(3), "levi_civita(2,2,p,2)(3)");
472  test_for_zero(levi_civita(2, 2, p, 3)(0), "levi_civita(2,2,p,3)(0)");
473  test_for_zero(levi_civita(2, 2, p, 3)(1), "levi_civita(2,2,p,3)(1)");
474  test_for_zero(levi_civita(2, 2, p, 3)(2), "levi_civita(2,2,p,3)(2)");
475  test_for_zero(levi_civita(2, 2, p, 3)(3), "levi_civita(2,2,p,3)(3)");
476 
477  test_for_zero(levi_civita(2, 3, p, 0)(0), "levi_civita(2,3,p,0)(0)");
478  test_for_zero(levi_civita(2, 3, p, 0)(1) + 1, "levi_civita(2,3,p,0)(1)");
479  test_for_zero(levi_civita(2, 3, p, 0)(2), "levi_civita(2,3,p,0)(2)");
480  test_for_zero(levi_civita(2, 3, p, 0)(3), "levi_civita(2,3,p,0)(3)");
481  test_for_zero(levi_civita(2, 3, p, 1)(0) - 1, "levi_civita(2,3,p,1)(0)");
482  test_for_zero(levi_civita(2, 3, p, 1)(1), "levi_civita(2,3,p,1)(1)");
483  test_for_zero(levi_civita(2, 3, p, 1)(2), "levi_civita(2,3,p,1)(2)");
484  test_for_zero(levi_civita(2, 3, p, 1)(3), "levi_civita(2,3,p,1)(3)");
485  test_for_zero(levi_civita(2, 3, p, 2)(0), "levi_civita(2,3,p,2)(0)");
486  test_for_zero(levi_civita(2, 3, p, 2)(1), "levi_civita(2,3,p,2)(1)");
487  test_for_zero(levi_civita(2, 3, p, 2)(2), "levi_civita(2,3,p,2)(2)");
488  test_for_zero(levi_civita(2, 3, p, 2)(3), "levi_civita(2,3,p,2)(3)");
489  test_for_zero(levi_civita(2, 3, p, 3)(0), "levi_civita(2,3,p,3)(0)");
490  test_for_zero(levi_civita(2, 3, p, 3)(1), "levi_civita(2,3,p,3)(1)");
491  test_for_zero(levi_civita(2, 3, p, 3)(2), "levi_civita(2,3,p,3)(2)");
492  test_for_zero(levi_civita(2, 3, p, 3)(3), "levi_civita(2,3,p,3)(3)");
493 
494  test_for_zero(levi_civita(3, 0, p, 0)(0), "levi_civita(3,0,p,0)(0)");
495  test_for_zero(levi_civita(3, 0, p, 0)(1), "levi_civita(3,0,p,0)(1)");
496  test_for_zero(levi_civita(3, 0, p, 0)(2), "levi_civita(3,0,p,0)(2)");
497  test_for_zero(levi_civita(3, 0, p, 0)(3), "levi_civita(3,0,p,0)(3)");
498  test_for_zero(levi_civita(3, 0, p, 1)(0), "levi_civita(3,0,p,1)(0)");
499  test_for_zero(levi_civita(3, 0, p, 1)(1), "levi_civita(3,0,p,1)(1)");
500  test_for_zero(levi_civita(3, 0, p, 1)(2) - 1, "levi_civita(3,0,p,1)(2)");
501  test_for_zero(levi_civita(3, 0, p, 1)(3), "levi_civita(3,0,p,1)(3)");
502  test_for_zero(levi_civita(3, 0, p, 2)(0), "levi_civita(3,0,p,2)(0)");
503  test_for_zero(levi_civita(3, 0, p, 2)(1) + 1, "levi_civita(3,0,p,2)(1)");
504  test_for_zero(levi_civita(3, 0, p, 2)(2), "levi_civita(3,0,p,2)(2)");
505  test_for_zero(levi_civita(3, 0, p, 2)(3), "levi_civita(3,0,p,2)(3)");
506  test_for_zero(levi_civita(3, 0, p, 3)(0), "levi_civita(3,0,p,3)(0)");
507  test_for_zero(levi_civita(3, 0, p, 3)(1), "levi_civita(3,0,p,3)(1)");
508  test_for_zero(levi_civita(3, 0, p, 3)(2), "levi_civita(3,0,p,3)(2)");
509  test_for_zero(levi_civita(3, 0, p, 3)(3), "levi_civita(3,0,p,3)(3)");
510 
511  test_for_zero(levi_civita(3, 1, p, 0)(0), "levi_civita(3,1,p,0)(0)");
512  test_for_zero(levi_civita(3, 1, p, 0)(1), "levi_civita(3,1,p,0)(1)");
513  test_for_zero(levi_civita(3, 1, p, 0)(2) + 1, "levi_civita(3,1,p,0)(2)");
514  test_for_zero(levi_civita(3, 1, p, 0)(3), "levi_civita(3,1,p,0)(3)");
515  test_for_zero(levi_civita(3, 1, p, 1)(0), "levi_civita(3,1,p,1)(0)");
516  test_for_zero(levi_civita(3, 1, p, 1)(1), "levi_civita(3,1,p,1)(1)");
517  test_for_zero(levi_civita(3, 1, p, 1)(2), "levi_civita(3,1,p,1)(2)");
518  test_for_zero(levi_civita(3, 1, p, 1)(3), "levi_civita(3,1,p,1)(3)");
519  test_for_zero(levi_civita(3, 1, p, 2)(0) - 1, "levi_civita(3,1,p,2)(0)");
520  test_for_zero(levi_civita(3, 1, p, 2)(1), "levi_civita(3,1,p,2)(1)");
521  test_for_zero(levi_civita(3, 1, p, 2)(2), "levi_civita(3,1,p,2)(2)");
522  test_for_zero(levi_civita(3, 1, p, 2)(3), "levi_civita(3,1,p,2)(3)");
523  test_for_zero(levi_civita(3, 1, p, 3)(0), "levi_civita(3,1,p,3)(0)");
524  test_for_zero(levi_civita(3, 1, p, 3)(1), "levi_civita(3,1,p,3)(1)");
525  test_for_zero(levi_civita(3, 1, p, 3)(2), "levi_civita(3,1,p,3)(2)");
526  test_for_zero(levi_civita(3, 1, p, 3)(3), "levi_civita(3,1,p,3)(3)");
527 
528  test_for_zero(levi_civita(3, 2, p, 0)(0), "levi_civita(3,2,p,0)(0)");
529  test_for_zero(levi_civita(3, 2, p, 0)(1) - 1, "levi_civita(3,2,p,0)(1)");
530  test_for_zero(levi_civita(3, 2, p, 0)(2), "levi_civita(3,2,p,0)(2)");
531  test_for_zero(levi_civita(3, 2, p, 0)(3), "levi_civita(3,2,p,0)(3)");
532  test_for_zero(levi_civita(3, 2, p, 1)(0) + 1, "levi_civita(3,2,p,1)(0)");
533  test_for_zero(levi_civita(3, 2, p, 1)(1), "levi_civita(3,2,p,1)(1)");
534  test_for_zero(levi_civita(3, 2, p, 1)(2), "levi_civita(3,2,p,1)(2)");
535  test_for_zero(levi_civita(3, 2, p, 1)(3), "levi_civita(3,2,p,1)(3)");
536  test_for_zero(levi_civita(3, 2, p, 2)(0), "levi_civita(3,2,p,2)(0)");
537  test_for_zero(levi_civita(3, 2, p, 2)(1), "levi_civita(3,2,p,2)(1)");
538  test_for_zero(levi_civita(3, 2, p, 2)(2), "levi_civita(3,2,p,2)(2)");
539  test_for_zero(levi_civita(3, 2, p, 2)(3), "levi_civita(3,2,p,2)(3)");
540  test_for_zero(levi_civita(3, 2, p, 3)(0), "levi_civita(3,2,p,3)(0)");
541  test_for_zero(levi_civita(3, 2, p, 3)(1), "levi_civita(3,2,p,3)(1)");
542  test_for_zero(levi_civita(3, 2, p, 3)(2), "levi_civita(3,2,p,3)(2)");
543  test_for_zero(levi_civita(3, 2, p, 3)(3), "levi_civita(3,2,p,3)(3)");
544 
545  test_for_zero(levi_civita(3, 3, p, 0)(0), "levi_civita(3,3,p,0)(0)");
546  test_for_zero(levi_civita(3, 3, p, 0)(1), "levi_civita(3,3,p,0)(1)");
547  test_for_zero(levi_civita(3, 3, p, 0)(2), "levi_civita(3,3,p,0)(2)");
548  test_for_zero(levi_civita(3, 3, p, 0)(3), "levi_civita(3,3,p,0)(3)");
549  test_for_zero(levi_civita(3, 3, p, 1)(0), "levi_civita(3,3,p,1)(0)");
550  test_for_zero(levi_civita(3, 3, p, 1)(1), "levi_civita(3,3,p,1)(1)");
551  test_for_zero(levi_civita(3, 3, p, 1)(2), "levi_civita(3,3,p,1)(2)");
552  test_for_zero(levi_civita(3, 3, p, 1)(3), "levi_civita(3,3,p,1)(3)");
553  test_for_zero(levi_civita(3, 3, p, 2)(0), "levi_civita(3,3,p,2)(0)");
554  test_for_zero(levi_civita(3, 3, p, 2)(1), "levi_civita(3,3,p,2)(1)");
555  test_for_zero(levi_civita(3, 3, p, 2)(2), "levi_civita(3,3,p,2)(2)");
556  test_for_zero(levi_civita(3, 3, p, 2)(3), "levi_civita(3,3,p,2)(3)");
557  test_for_zero(levi_civita(3, 3, p, 3)(0), "levi_civita(3,3,p,3)(0)");
558  test_for_zero(levi_civita(3, 3, p, 3)(1), "levi_civita(3,3,p,3)(1)");
559  test_for_zero(levi_civita(3, 3, p, 3)(2), "levi_civita(3,3,p,3)(2)");
560  test_for_zero(levi_civita(3, 3, p, 3)(3), "levi_civita(3,3,p,3)(3)");
561 
562  test_for_zero(levi_civita(0, o, 0, 0)(0), "levi_civita(0,o,0,0)(0)");
563  test_for_zero(levi_civita(0, o, 0, 0)(1), "levi_civita(0,o,0,0)(1)");
564  test_for_zero(levi_civita(0, o, 0, 0)(2), "levi_civita(0,o,0,0)(2)");
565  test_for_zero(levi_civita(0, o, 0, 0)(3), "levi_civita(0,o,0,0)(3)");
566  test_for_zero(levi_civita(0, o, 0, 1)(0), "levi_civita(0,o,0,1)(0)");
567  test_for_zero(levi_civita(0, o, 0, 1)(1), "levi_civita(0,o,0,1)(1)");
568  test_for_zero(levi_civita(0, o, 0, 1)(2), "levi_civita(0,o,0,1)(2)");
569  test_for_zero(levi_civita(0, o, 0, 1)(3), "levi_civita(0,o,0,1)(3)");
570  test_for_zero(levi_civita(0, o, 0, 2)(0), "levi_civita(0,o,0,2)(0)");
571  test_for_zero(levi_civita(0, o, 0, 2)(1), "levi_civita(0,o,0,2)(1)");
572  test_for_zero(levi_civita(0, o, 0, 2)(2), "levi_civita(0,o,0,2)(2)");
573  test_for_zero(levi_civita(0, o, 0, 2)(3), "levi_civita(0,o,0,2)(3)");
574  test_for_zero(levi_civita(0, o, 0, 3)(0), "levi_civita(0,o,0,3)(0)");
575  test_for_zero(levi_civita(0, o, 0, 3)(1), "levi_civita(0,o,0,3)(1)");
576  test_for_zero(levi_civita(0, o, 0, 3)(2), "levi_civita(0,o,0,3)(2)");
577  test_for_zero(levi_civita(0, o, 0, 3)(3), "levi_civita(0,o,0,3)(3)");
578 
579  test_for_zero(levi_civita(0, o, 1, 0)(0), "levi_civita(0,o,1,0)(0)");
580  test_for_zero(levi_civita(0, o, 1, 0)(1), "levi_civita(0,o,1,0)(1)");
581  test_for_zero(levi_civita(0, o, 1, 0)(2), "levi_civita(0,o,1,0)(2)");
582  test_for_zero(levi_civita(0, o, 1, 0)(3), "levi_civita(0,o,1,0)(3)");
583  test_for_zero(levi_civita(0, o, 1, 1)(0), "levi_civita(0,o,1,1)(0)");
584  test_for_zero(levi_civita(0, o, 1, 1)(1), "levi_civita(0,o,1,1)(1)");
585  test_for_zero(levi_civita(0, o, 1, 1)(2), "levi_civita(0,o,1,1)(2)");
586  test_for_zero(levi_civita(0, o, 1, 1)(3), "levi_civita(0,o,1,1)(3)");
587  test_for_zero(levi_civita(0, o, 1, 2)(0), "levi_civita(0,o,1,2)(0)");
588  test_for_zero(levi_civita(0, o, 1, 2)(1), "levi_civita(0,o,1,2)(1)");
589  test_for_zero(levi_civita(0, o, 1, 2)(2), "levi_civita(0,o,1,2)(2)");
590  test_for_zero(levi_civita(0, o, 1, 2)(3) - 1, "levi_civita(0,o,1,2)(3)");
591  test_for_zero(levi_civita(0, o, 1, 3)(0), "levi_civita(0,o,1,3)(0)");
592  test_for_zero(levi_civita(0, o, 1, 3)(1), "levi_civita(0,o,1,3)(1)");
593  test_for_zero(levi_civita(0, o, 1, 3)(2) + 1, "levi_civita(0,o,1,3)(2)");
594  test_for_zero(levi_civita(0, o, 1, 3)(3), "levi_civita(0,o,1,3)(3)");
595 
596  test_for_zero(levi_civita(0, o, 2, 0)(0), "levi_civita(0,o,2,0)(0)");
597  test_for_zero(levi_civita(0, o, 2, 0)(1), "levi_civita(0,o,2,0)(1)");
598  test_for_zero(levi_civita(0, o, 2, 0)(2), "levi_civita(0,o,2,0)(2)");
599  test_for_zero(levi_civita(0, o, 2, 0)(3), "levi_civita(0,o,2,0)(3)");
600  test_for_zero(levi_civita(0, o, 2, 1)(0), "levi_civita(0,o,2,1)(0)");
601  test_for_zero(levi_civita(0, o, 2, 1)(1), "levi_civita(0,o,2,1)(1)");
602  test_for_zero(levi_civita(0, o, 2, 1)(2), "levi_civita(0,o,2,1)(2)");
603  test_for_zero(levi_civita(0, o, 2, 1)(3) + 1, "levi_civita(0,o,2,1)(3)");
604  test_for_zero(levi_civita(0, o, 2, 2)(0), "levi_civita(0,o,2,2)(0)");
605  test_for_zero(levi_civita(0, o, 2, 2)(1), "levi_civita(0,o,2,2)(1)");
606  test_for_zero(levi_civita(0, o, 2, 2)(2), "levi_civita(0,o,2,2)(2)");
607  test_for_zero(levi_civita(0, o, 2, 2)(3), "levi_civita(0,o,2,2)(3)");
608  test_for_zero(levi_civita(0, o, 2, 3)(0), "levi_civita(0,o,2,3)(0)");
609  test_for_zero(levi_civita(0, o, 2, 3)(1) - 1, "levi_civita(0,o,2,3)(1)");
610  test_for_zero(levi_civita(0, o, 2, 3)(2), "levi_civita(0,o,2,3)(2)");
611  test_for_zero(levi_civita(0, o, 2, 3)(3), "levi_civita(0,o,2,3)(3)");
612 
613  test_for_zero(levi_civita(0, o, 3, 0)(0), "levi_civita(0,o,3,0)(0)");
614  test_for_zero(levi_civita(0, o, 3, 0)(1), "levi_civita(0,o,3,0)(1)");
615  test_for_zero(levi_civita(0, o, 3, 0)(2), "levi_civita(0,o,3,0)(2)");
616  test_for_zero(levi_civita(0, o, 3, 0)(3), "levi_civita(0,o,3,0)(3)");
617  test_for_zero(levi_civita(0, o, 3, 1)(0), "levi_civita(0,o,3,1)(0)");
618  test_for_zero(levi_civita(0, o, 3, 1)(1), "levi_civita(0,o,3,1)(1)");
619  test_for_zero(levi_civita(0, o, 3, 1)(2) - 1, "levi_civita(0,o,3,1)(2)");
620  test_for_zero(levi_civita(0, o, 3, 1)(3), "levi_civita(0,o,3,1)(3)");
621  test_for_zero(levi_civita(0, o, 3, 2)(0), "levi_civita(0,o,3,2)(0)");
622  test_for_zero(levi_civita(0, o, 3, 2)(1) + 1, "levi_civita(0,o,3,2)(1)");
623  test_for_zero(levi_civita(0, o, 3, 2)(2), "levi_civita(0,o,3,2)(2)");
624  test_for_zero(levi_civita(0, o, 3, 2)(3), "levi_civita(0,o,3,2)(3)");
625  test_for_zero(levi_civita(0, o, 3, 3)(0), "levi_civita(0,o,3,3)(0)");
626  test_for_zero(levi_civita(0, o, 3, 3)(1), "levi_civita(0,o,3,3)(1)");
627  test_for_zero(levi_civita(0, o, 3, 3)(2), "levi_civita(0,o,3,3)(2)");
628  test_for_zero(levi_civita(0, o, 3, 3)(3), "levi_civita(0,o,3,3)(3)");
629 
630  test_for_zero(levi_civita(1, o, 0, 0)(0), "levi_civita(1,o,0,0)(0)");
631  test_for_zero(levi_civita(1, o, 0, 0)(1), "levi_civita(1,o,0,0)(1)");
632  test_for_zero(levi_civita(1, o, 0, 0)(2), "levi_civita(1,o,0,0)(2)");
633  test_for_zero(levi_civita(1, o, 0, 0)(3), "levi_civita(1,o,0,0)(3)");
634  test_for_zero(levi_civita(1, o, 0, 1)(0), "levi_civita(1,o,0,1)(0)");
635  test_for_zero(levi_civita(1, o, 0, 1)(1), "levi_civita(1,o,0,1)(1)");
636  test_for_zero(levi_civita(1, o, 0, 1)(2), "levi_civita(1,o,0,1)(2)");
637  test_for_zero(levi_civita(1, o, 0, 1)(3), "levi_civita(1,o,0,1)(3)");
638  test_for_zero(levi_civita(1, o, 0, 2)(0), "levi_civita(1,o,0,2)(0)");
639  test_for_zero(levi_civita(1, o, 0, 2)(1), "levi_civita(1,o,0,2)(1)");
640  test_for_zero(levi_civita(1, o, 0, 2)(2), "levi_civita(1,o,0,2)(2)");
641  test_for_zero(levi_civita(1, o, 0, 2)(3) + 1, "levi_civita(1,o,0,2)(3)");
642  test_for_zero(levi_civita(1, o, 0, 3)(0), "levi_civita(1,o,0,3)(0)");
643  test_for_zero(levi_civita(1, o, 0, 3)(1), "levi_civita(1,o,0,3)(1)");
644  test_for_zero(levi_civita(1, o, 0, 3)(2) - 1, "levi_civita(1,o,0,3)(2)");
645  test_for_zero(levi_civita(1, o, 0, 3)(3), "levi_civita(1,o,0,3)(3)");
646 
647  test_for_zero(levi_civita(1, o, 1, 0)(0), "levi_civita(1,o,1,0)(0)");
648  test_for_zero(levi_civita(1, o, 1, 0)(1), "levi_civita(1,o,1,0)(1)");
649  test_for_zero(levi_civita(1, o, 1, 0)(2), "levi_civita(1,o,1,0)(2)");
650  test_for_zero(levi_civita(1, o, 1, 0)(3), "levi_civita(1,o,1,0)(3)");
651  test_for_zero(levi_civita(1, o, 1, 1)(0), "levi_civita(1,o,1,1)(0)");
652  test_for_zero(levi_civita(1, o, 1, 1)(1), "levi_civita(1,o,1,1)(1)");
653  test_for_zero(levi_civita(1, o, 1, 1)(2), "levi_civita(1,o,1,1)(2)");
654  test_for_zero(levi_civita(1, o, 1, 1)(3), "levi_civita(1,o,1,1)(3)");
655  test_for_zero(levi_civita(1, o, 1, 2)(0), "levi_civita(1,o,1,2)(0)");
656  test_for_zero(levi_civita(1, o, 1, 2)(1), "levi_civita(1,o,1,2)(1)");
657  test_for_zero(levi_civita(1, o, 1, 2)(2), "levi_civita(1,o,1,2)(2)");
658  test_for_zero(levi_civita(1, o, 1, 2)(3), "levi_civita(1,o,1,2)(3)");
659  test_for_zero(levi_civita(1, o, 1, 3)(0), "levi_civita(1,o,1,3)(0)");
660  test_for_zero(levi_civita(1, o, 1, 3)(1), "levi_civita(1,o,1,3)(1)");
661  test_for_zero(levi_civita(1, o, 1, 3)(2), "levi_civita(1,o,1,3)(2)");
662  test_for_zero(levi_civita(1, o, 1, 3)(3), "levi_civita(1,o,1,3)(3)");
663 
664  test_for_zero(levi_civita(1, o, 2, 0)(0), "levi_civita(1,o,2,0)(0)");
665  test_for_zero(levi_civita(1, o, 2, 0)(1), "levi_civita(1,o,2,0)(1)");
666  test_for_zero(levi_civita(1, o, 2, 0)(2), "levi_civita(1,o,2,0)(2)");
667  test_for_zero(levi_civita(1, o, 2, 0)(3) - 1, "levi_civita(1,o,2,0)(3)");
668  test_for_zero(levi_civita(1, o, 2, 1)(0), "levi_civita(1,o,2,1)(0)");
669  test_for_zero(levi_civita(1, o, 2, 1)(1), "levi_civita(1,o,2,1)(1)");
670  test_for_zero(levi_civita(1, o, 2, 1)(2), "levi_civita(1,o,2,1)(2)");
671  test_for_zero(levi_civita(1, o, 2, 1)(3), "levi_civita(1,o,2,1)(3)");
672  test_for_zero(levi_civita(1, o, 2, 2)(0), "levi_civita(1,o,2,2)(0)");
673  test_for_zero(levi_civita(1, o, 2, 2)(1), "levi_civita(1,o,2,2)(1)");
674  test_for_zero(levi_civita(1, o, 2, 2)(2), "levi_civita(1,o,2,2)(2)");
675  test_for_zero(levi_civita(1, o, 2, 2)(3), "levi_civita(1,o,2,2)(3)");
676  test_for_zero(levi_civita(1, o, 2, 3)(0) + 1, "levi_civita(1,o,2,3)(0)");
677  test_for_zero(levi_civita(1, o, 2, 3)(1), "levi_civita(1,o,2,3)(1)");
678  test_for_zero(levi_civita(1, o, 2, 3)(2), "levi_civita(1,o,2,3)(2)");
679  test_for_zero(levi_civita(1, o, 2, 3)(3), "levi_civita(1,o,2,3)(3)");
680 
681  test_for_zero(levi_civita(1, o, 3, 0)(0), "levi_civita(1,o,3,0)(0)");
682  test_for_zero(levi_civita(1, o, 3, 0)(1), "levi_civita(1,o,3,0)(1)");
683  test_for_zero(levi_civita(1, o, 3, 0)(2) + 1, "levi_civita(1,o,3,0)(2)");
684  test_for_zero(levi_civita(1, o, 3, 0)(3), "levi_civita(1,o,3,0)(3)");
685  test_for_zero(levi_civita(1, o, 3, 1)(0), "levi_civita(1,o,3,1)(0)");
686  test_for_zero(levi_civita(1, o, 3, 1)(1), "levi_civita(1,o,3,1)(1)");
687  test_for_zero(levi_civita(1, o, 3, 1)(2), "levi_civita(1,o,3,1)(2)");
688  test_for_zero(levi_civita(1, o, 3, 1)(3), "levi_civita(1,o,3,1)(3)");
689  test_for_zero(levi_civita(1, o, 3, 2)(0) - 1, "levi_civita(1,o,3,2)(0)");
690  test_for_zero(levi_civita(1, o, 3, 2)(1), "levi_civita(1,o,3,2)(1)");
691  test_for_zero(levi_civita(1, o, 3, 2)(2), "levi_civita(1,o,3,2)(2)");
692  test_for_zero(levi_civita(1, o, 3, 2)(3), "levi_civita(1,o,3,2)(3)");
693  test_for_zero(levi_civita(1, o, 3, 3)(0), "levi_civita(1,o,3,3)(0)");
694  test_for_zero(levi_civita(1, o, 3, 3)(1), "levi_civita(1,o,3,3)(1)");
695  test_for_zero(levi_civita(1, o, 3, 3)(2), "levi_civita(1,o,3,3)(2)");
696  test_for_zero(levi_civita(1, o, 3, 3)(3), "levi_civita(1,o,3,3)(3)");
697 
698  test_for_zero(levi_civita(2, o, 0, 0)(0), "levi_civita(2,o,0,0)(0)");
699  test_for_zero(levi_civita(2, o, 0, 0)(1), "levi_civita(2,o,0,0)(1)");
700  test_for_zero(levi_civita(2, o, 0, 0)(2), "levi_civita(2,o,0,0)(2)");
701  test_for_zero(levi_civita(2, o, 0, 0)(3), "levi_civita(2,o,0,0)(3)");
702  test_for_zero(levi_civita(2, o, 0, 1)(0), "levi_civita(2,o,0,1)(0)");
703  test_for_zero(levi_civita(2, o, 0, 1)(1), "levi_civita(2,o,0,1)(1)");
704  test_for_zero(levi_civita(2, o, 0, 1)(2), "levi_civita(2,o,0,1)(2)");
705  test_for_zero(levi_civita(2, o, 0, 1)(3) - 1, "levi_civita(2,o,0,1)(3)");
706  test_for_zero(levi_civita(2, o, 0, 2)(0), "levi_civita(2,o,0,2)(0)");
707  test_for_zero(levi_civita(2, o, 0, 2)(1), "levi_civita(2,o,0,2)(1)");
708  test_for_zero(levi_civita(2, o, 0, 2)(2), "levi_civita(2,o,0,2)(2)");
709  test_for_zero(levi_civita(2, o, 0, 2)(3), "levi_civita(2,o,0,2)(3)");
710  test_for_zero(levi_civita(2, o, 0, 3)(0), "levi_civita(2,o,0,3)(0)");
711  test_for_zero(levi_civita(2, o, 0, 3)(1) + 1, "levi_civita(2,o,0,3)(1)");
712  test_for_zero(levi_civita(2, o, 0, 3)(2), "levi_civita(2,o,0,3)(2)");
713  test_for_zero(levi_civita(2, o, 0, 3)(3), "levi_civita(2,o,0,3)(3)");
714 
715  test_for_zero(levi_civita(2, o, 1, 0)(0), "levi_civita(2,o,1,0)(0)");
716  test_for_zero(levi_civita(2, o, 1, 0)(1), "levi_civita(2,o,1,0)(1)");
717  test_for_zero(levi_civita(2, o, 1, 0)(2), "levi_civita(2,o,1,0)(2)");
718  test_for_zero(levi_civita(2, o, 1, 0)(3) + 1, "levi_civita(2,o,1,0)(3)");
719  test_for_zero(levi_civita(2, o, 1, 1)(0), "levi_civita(2,o,1,1)(0)");
720  test_for_zero(levi_civita(2, o, 1, 1)(1), "levi_civita(2,o,1,1)(1)");
721  test_for_zero(levi_civita(2, o, 1, 1)(2), "levi_civita(2,o,1,1)(2)");
722  test_for_zero(levi_civita(2, o, 1, 1)(3), "levi_civita(2,o,1,1)(3)");
723  test_for_zero(levi_civita(2, o, 1, 2)(0), "levi_civita(2,o,1,2)(0)");
724  test_for_zero(levi_civita(2, o, 1, 2)(1), "levi_civita(2,o,1,2)(1)");
725  test_for_zero(levi_civita(2, o, 1, 2)(2), "levi_civita(2,o,1,2)(2)");
726  test_for_zero(levi_civita(2, o, 1, 2)(3), "levi_civita(2,o,1,2)(3)");
727  test_for_zero(levi_civita(2, o, 1, 3)(0) - 1, "levi_civita(2,o,1,3)(0)");
728  test_for_zero(levi_civita(2, o, 1, 3)(1), "levi_civita(2,o,1,3)(1)");
729  test_for_zero(levi_civita(2, o, 1, 3)(2), "levi_civita(2,o,1,3)(2)");
730  test_for_zero(levi_civita(2, o, 1, 3)(3), "levi_civita(2,o,1,3)(3)");
731 
732  test_for_zero(levi_civita(2, o, 2, 0)(0), "levi_civita(2,o,2,0)(0)");
733  test_for_zero(levi_civita(2, o, 2, 0)(1), "levi_civita(2,o,2,0)(1)");
734  test_for_zero(levi_civita(2, o, 2, 0)(2), "levi_civita(2,o,2,0)(2)");
735  test_for_zero(levi_civita(2, o, 2, 0)(3), "levi_civita(2,o,2,0)(3)");
736  test_for_zero(levi_civita(2, o, 2, 1)(0), "levi_civita(2,o,2,1)(0)");
737  test_for_zero(levi_civita(2, o, 2, 1)(1), "levi_civita(2,o,2,1)(1)");
738  test_for_zero(levi_civita(2, o, 2, 1)(2), "levi_civita(2,o,2,1)(2)");
739  test_for_zero(levi_civita(2, o, 2, 1)(3), "levi_civita(2,o,2,1)(3)");
740  test_for_zero(levi_civita(2, o, 2, 2)(0), "levi_civita(2,o,2,2)(0)");
741  test_for_zero(levi_civita(2, o, 2, 2)(1), "levi_civita(2,o,2,2)(1)");
742  test_for_zero(levi_civita(2, o, 2, 2)(2), "levi_civita(2,o,2,2)(2)");
743  test_for_zero(levi_civita(2, o, 2, 2)(3), "levi_civita(2,o,2,2)(3)");
744  test_for_zero(levi_civita(2, o, 2, 3)(0), "levi_civita(2,o,2,3)(0)");
745  test_for_zero(levi_civita(2, o, 2, 3)(1), "levi_civita(2,o,2,3)(1)");
746  test_for_zero(levi_civita(2, o, 2, 3)(2), "levi_civita(2,o,2,3)(2)");
747  test_for_zero(levi_civita(2, o, 2, 3)(3), "levi_civita(2,o,2,3)(3)");
748 
749  test_for_zero(levi_civita(2, o, 3, 0)(0), "levi_civita(2,o,3,0)(0)");
750  test_for_zero(levi_civita(2, o, 3, 0)(1) - 1, "levi_civita(2,o,3,0)(1)");
751  test_for_zero(levi_civita(2, o, 3, 0)(2), "levi_civita(2,o,3,0)(2)");
752  test_for_zero(levi_civita(2, o, 3, 0)(3), "levi_civita(2,o,3,0)(3)");
753  test_for_zero(levi_civita(2, o, 3, 1)(0) + 1, "levi_civita(2,o,3,1)(0)");
754  test_for_zero(levi_civita(2, o, 3, 1)(1), "levi_civita(2,o,3,1)(1)");
755  test_for_zero(levi_civita(2, o, 3, 1)(2), "levi_civita(2,o,3,1)(2)");
756  test_for_zero(levi_civita(2, o, 3, 1)(3), "levi_civita(2,o,3,1)(3)");
757  test_for_zero(levi_civita(2, o, 3, 2)(0), "levi_civita(2,o,3,2)(0)");
758  test_for_zero(levi_civita(2, o, 3, 2)(1), "levi_civita(2,o,3,2)(1)");
759  test_for_zero(levi_civita(2, o, 3, 2)(2), "levi_civita(2,o,3,2)(2)");
760  test_for_zero(levi_civita(2, o, 3, 2)(3), "levi_civita(2,o,3,2)(3)");
761  test_for_zero(levi_civita(2, o, 3, 3)(0), "levi_civita(2,o,3,3)(0)");
762  test_for_zero(levi_civita(2, o, 3, 3)(1), "levi_civita(2,o,3,3)(1)");
763  test_for_zero(levi_civita(2, o, 3, 3)(2), "levi_civita(2,o,3,3)(2)");
764  test_for_zero(levi_civita(2, o, 3, 3)(3), "levi_civita(2,o,3,3)(3)");
765 
766  test_for_zero(levi_civita(3, o, 0, 0)(0), "levi_civita(3,o,0,0)(0)");
767  test_for_zero(levi_civita(3, o, 0, 0)(1), "levi_civita(3,o,0,0)(1)");
768  test_for_zero(levi_civita(3, o, 0, 0)(2), "levi_civita(3,o,0,0)(2)");
769  test_for_zero(levi_civita(3, o, 0, 0)(3), "levi_civita(3,o,0,0)(3)");
770  test_for_zero(levi_civita(3, o, 0, 1)(0), "levi_civita(3,o,0,1)(0)");
771  test_for_zero(levi_civita(3, o, 0, 1)(1), "levi_civita(3,o,0,1)(1)");
772  test_for_zero(levi_civita(3, o, 0, 1)(2) + 1, "levi_civita(3,o,0,1)(2)");
773  test_for_zero(levi_civita(3, o, 0, 1)(3), "levi_civita(3,o,0,1)(3)");
774  test_for_zero(levi_civita(3, o, 0, 2)(0), "levi_civita(3,o,0,2)(0)");
775  test_for_zero(levi_civita(3, o, 0, 2)(1) - 1, "levi_civita(3,o,0,2)(1)");
776  test_for_zero(levi_civita(3, o, 0, 2)(2), "levi_civita(3,o,0,2)(2)");
777  test_for_zero(levi_civita(3, o, 0, 2)(3), "levi_civita(3,o,0,2)(3)");
778  test_for_zero(levi_civita(3, o, 0, 3)(0), "levi_civita(3,o,0,3)(0)");
779  test_for_zero(levi_civita(3, o, 0, 3)(1), "levi_civita(3,o,0,3)(1)");
780  test_for_zero(levi_civita(3, o, 0, 3)(2), "levi_civita(3,o,0,3)(2)");
781  test_for_zero(levi_civita(3, o, 0, 3)(3), "levi_civita(3,o,0,3)(3)");
782 
783  test_for_zero(levi_civita(3, o, 1, 0)(0), "levi_civita(3,o,1,0)(0)");
784  test_for_zero(levi_civita(3, o, 1, 0)(1), "levi_civita(3,o,1,0)(1)");
785  test_for_zero(levi_civita(3, o, 1, 0)(2) - 1, "levi_civita(3,o,1,0)(2)");
786  test_for_zero(levi_civita(3, o, 1, 0)(3), "levi_civita(3,o,1,0)(3)");
787  test_for_zero(levi_civita(3, o, 1, 1)(0), "levi_civita(3,o,1,1)(0)");
788  test_for_zero(levi_civita(3, o, 1, 1)(1), "levi_civita(3,o,1,1)(1)");
789  test_for_zero(levi_civita(3, o, 1, 1)(2), "levi_civita(3,o,1,1)(2)");
790  test_for_zero(levi_civita(3, o, 1, 1)(3), "levi_civita(3,o,1,1)(3)");
791  test_for_zero(levi_civita(3, o, 1, 2)(0) + 1, "levi_civita(3,o,1,2)(0)");
792  test_for_zero(levi_civita(3, o, 1, 2)(1), "levi_civita(3,o,1,2)(1)");
793  test_for_zero(levi_civita(3, o, 1, 2)(2), "levi_civita(3,o,1,2)(2)");
794  test_for_zero(levi_civita(3, o, 1, 2)(3), "levi_civita(3,o,1,2)(3)");
795  test_for_zero(levi_civita(3, o, 1, 3)(0), "levi_civita(3,o,1,3)(0)");
796  test_for_zero(levi_civita(3, o, 1, 3)(1), "levi_civita(3,o,1,3)(1)");
797  test_for_zero(levi_civita(3, o, 1, 3)(2), "levi_civita(3,o,1,3)(2)");
798  test_for_zero(levi_civita(3, o, 1, 3)(3), "levi_civita(3,o,1,3)(3)");
799 
800  test_for_zero(levi_civita(3, o, 2, 0)(0), "levi_civita(3,o,2,0)(0)");
801  test_for_zero(levi_civita(3, o, 2, 0)(1) + 1, "levi_civita(3,o,2,0)(1)");
802  test_for_zero(levi_civita(3, o, 2, 0)(2), "levi_civita(3,o,2,0)(2)");
803  test_for_zero(levi_civita(3, o, 2, 0)(3), "levi_civita(3,o,2,0)(3)");
804  test_for_zero(levi_civita(3, o, 2, 1)(0) - 1, "levi_civita(3,o,2,1)(0)");
805  test_for_zero(levi_civita(3, o, 2, 1)(1), "levi_civita(3,o,2,1)(1)");
806  test_for_zero(levi_civita(3, o, 2, 1)(2), "levi_civita(3,o,2,1)(2)");
807  test_for_zero(levi_civita(3, o, 2, 1)(3), "levi_civita(3,o,2,1)(3)");
808  test_for_zero(levi_civita(3, o, 2, 2)(0), "levi_civita(3,o,2,2)(0)");
809  test_for_zero(levi_civita(3, o, 2, 2)(1), "levi_civita(3,o,2,2)(1)");
810  test_for_zero(levi_civita(3, o, 2, 2)(2), "levi_civita(3,o,2,2)(2)");
811  test_for_zero(levi_civita(3, o, 2, 2)(3), "levi_civita(3,o,2,2)(3)");
812  test_for_zero(levi_civita(3, o, 2, 3)(0), "levi_civita(3,o,2,3)(0)");
813  test_for_zero(levi_civita(3, o, 2, 3)(1), "levi_civita(3,o,2,3)(1)");
814  test_for_zero(levi_civita(3, o, 2, 3)(2), "levi_civita(3,o,2,3)(2)");
815  test_for_zero(levi_civita(3, o, 2, 3)(3), "levi_civita(3,o,2,3)(3)");
816 
817  test_for_zero(levi_civita(3, o, 3, 0)(0), "levi_civita(3,o,3,0)(0)");
818  test_for_zero(levi_civita(3, o, 3, 0)(1), "levi_civita(3,o,3,0)(1)");
819  test_for_zero(levi_civita(3, o, 3, 0)(2), "levi_civita(3,o,3,0)(2)");
820  test_for_zero(levi_civita(3, o, 3, 0)(3), "levi_civita(3,o,3,0)(3)");
821  test_for_zero(levi_civita(3, o, 3, 1)(0), "levi_civita(3,o,3,1)(0)");
822  test_for_zero(levi_civita(3, o, 3, 1)(1), "levi_civita(3,o,3,1)(1)");
823  test_for_zero(levi_civita(3, o, 3, 1)(2), "levi_civita(3,o,3,1)(2)");
824  test_for_zero(levi_civita(3, o, 3, 1)(3), "levi_civita(3,o,3,1)(3)");
825  test_for_zero(levi_civita(3, o, 3, 2)(0), "levi_civita(3,o,3,2)(0)");
826  test_for_zero(levi_civita(3, o, 3, 2)(1), "levi_civita(3,o,3,2)(1)");
827  test_for_zero(levi_civita(3, o, 3, 2)(2), "levi_civita(3,o,3,2)(2)");
828  test_for_zero(levi_civita(3, o, 3, 2)(3), "levi_civita(3,o,3,2)(3)");
829  test_for_zero(levi_civita(3, o, 3, 3)(0), "levi_civita(3,o,3,3)(0)");
830  test_for_zero(levi_civita(3, o, 3, 3)(1), "levi_civita(3,o,3,3)(1)");
831  test_for_zero(levi_civita(3, o, 3, 3)(2), "levi_civita(3,o,3,3)(2)");
832  test_for_zero(levi_civita(3, o, 3, 3)(3), "levi_civita(3,o,3,3)(3)");
833 
834  test_for_zero(levi_civita(o, 0, 0, 0)(0), "levi_civita(o,0,0,0)(0)");
835  test_for_zero(levi_civita(o, 0, 0, 0)(1), "levi_civita(o,0,0,0)(1)");
836  test_for_zero(levi_civita(o, 0, 0, 0)(2), "levi_civita(o,0,0,0)(2)");
837  test_for_zero(levi_civita(o, 0, 0, 0)(3), "levi_civita(o,0,0,0)(3)");
838  test_for_zero(levi_civita(o, 0, 0, 1)(0), "levi_civita(o,0,0,1)(0)");
839  test_for_zero(levi_civita(o, 0, 0, 1)(1), "levi_civita(o,0,0,1)(1)");
840  test_for_zero(levi_civita(o, 0, 0, 1)(2), "levi_civita(o,0,0,1)(2)");
841  test_for_zero(levi_civita(o, 0, 0, 1)(3), "levi_civita(o,0,0,1)(3)");
842  test_for_zero(levi_civita(o, 0, 0, 2)(0), "levi_civita(o,0,0,2)(0)");
843  test_for_zero(levi_civita(o, 0, 0, 2)(1), "levi_civita(o,0,0,2)(1)");
844  test_for_zero(levi_civita(o, 0, 0, 2)(2), "levi_civita(o,0,0,2)(2)");
845  test_for_zero(levi_civita(o, 0, 0, 2)(3), "levi_civita(o,0,0,2)(3)");
846  test_for_zero(levi_civita(o, 0, 0, 3)(0), "levi_civita(o,0,0,3)(0)");
847  test_for_zero(levi_civita(o, 0, 0, 3)(1), "levi_civita(o,0,0,3)(1)");
848  test_for_zero(levi_civita(o, 0, 0, 3)(2), "levi_civita(o,0,0,3)(2)");
849  test_for_zero(levi_civita(o, 0, 0, 3)(3), "levi_civita(o,0,0,3)(3)");
850 
851  test_for_zero(levi_civita(o, 0, 1, 0)(0), "levi_civita(o,0,1,0)(0)");
852  test_for_zero(levi_civita(o, 0, 1, 0)(1), "levi_civita(o,0,1,0)(1)");
853  test_for_zero(levi_civita(o, 0, 1, 0)(2), "levi_civita(o,0,1,0)(2)");
854  test_for_zero(levi_civita(o, 0, 1, 0)(3), "levi_civita(o,0,1,0)(3)");
855  test_for_zero(levi_civita(o, 0, 1, 1)(0), "levi_civita(o,0,1,1)(0)");
856  test_for_zero(levi_civita(o, 0, 1, 1)(1), "levi_civita(o,0,1,1)(1)");
857  test_for_zero(levi_civita(o, 0, 1, 1)(2), "levi_civita(o,0,1,1)(2)");
858  test_for_zero(levi_civita(o, 0, 1, 1)(3), "levi_civita(o,0,1,1)(3)");
859  test_for_zero(levi_civita(o, 0, 1, 2)(0), "levi_civita(o,0,1,2)(0)");
860  test_for_zero(levi_civita(o, 0, 1, 2)(1), "levi_civita(o,0,1,2)(1)");
861  test_for_zero(levi_civita(o, 0, 1, 2)(2), "levi_civita(o,0,1,2)(2)");
862  test_for_zero(levi_civita(o, 0, 1, 2)(3) + 1, "levi_civita(o,0,1,2)(3)");
863  test_for_zero(levi_civita(o, 0, 1, 3)(0), "levi_civita(o,0,1,3)(0)");
864  test_for_zero(levi_civita(o, 0, 1, 3)(1), "levi_civita(o,0,1,3)(1)");
865  test_for_zero(levi_civita(o, 0, 1, 3)(2) - 1, "levi_civita(o,0,1,3)(2)");
866  test_for_zero(levi_civita(o, 0, 1, 3)(3), "levi_civita(o,0,1,3)(3)");
867 
868  test_for_zero(levi_civita(o, 0, 2, 0)(0), "levi_civita(o,0,2,0)(0)");
869  test_for_zero(levi_civita(o, 0, 2, 0)(1), "levi_civita(o,0,2,0)(1)");
870  test_for_zero(levi_civita(o, 0, 2, 0)(2), "levi_civita(o,0,2,0)(2)");
871  test_for_zero(levi_civita(o, 0, 2, 0)(3), "levi_civita(o,0,2,0)(3)");
872  test_for_zero(levi_civita(o, 0, 2, 1)(0), "levi_civita(o,0,2,1)(0)");
873  test_for_zero(levi_civita(o, 0, 2, 1)(1), "levi_civita(o,0,2,1)(1)");
874  test_for_zero(levi_civita(o, 0, 2, 1)(2), "levi_civita(o,0,2,1)(2)");
875  test_for_zero(levi_civita(o, 0, 2, 1)(3) - 1, "levi_civita(o,0,2,1)(3)");
876  test_for_zero(levi_civita(o, 0, 2, 2)(0), "levi_civita(o,0,2,2)(0)");
877  test_for_zero(levi_civita(o, 0, 2, 2)(1), "levi_civita(o,0,2,2)(1)");
878  test_for_zero(levi_civita(o, 0, 2, 2)(2), "levi_civita(o,0,2,2)(2)");
879  test_for_zero(levi_civita(o, 0, 2, 2)(3), "levi_civita(o,0,2,2)(3)");
880  test_for_zero(levi_civita(o, 0, 2, 3)(0), "levi_civita(o,0,2,3)(0)");
881  test_for_zero(levi_civita(o, 0, 2, 3)(1) + 1, "levi_civita(o,0,2,3)(1)");
882  test_for_zero(levi_civita(o, 0, 2, 3)(2), "levi_civita(o,0,2,3)(2)");
883  test_for_zero(levi_civita(o, 0, 2, 3)(3), "levi_civita(o,0,2,3)(3)");
884 
885  test_for_zero(levi_civita(o, 0, 3, 0)(0), "levi_civita(o,0,3,0)(0)");
886  test_for_zero(levi_civita(o, 0, 3, 0)(1), "levi_civita(o,0,3,0)(1)");
887  test_for_zero(levi_civita(o, 0, 3, 0)(2), "levi_civita(o,0,3,0)(2)");
888  test_for_zero(levi_civita(o, 0, 3, 0)(3), "levi_civita(o,0,3,0)(3)");
889  test_for_zero(levi_civita(o, 0, 3, 1)(0), "levi_civita(o,0,3,1)(0)");
890  test_for_zero(levi_civita(o, 0, 3, 1)(1), "levi_civita(o,0,3,1)(1)");
891  test_for_zero(levi_civita(o, 0, 3, 1)(2) + 1, "levi_civita(o,0,3,1)(2)");
892  test_for_zero(levi_civita(o, 0, 3, 1)(3), "levi_civita(o,0,3,1)(3)");
893  test_for_zero(levi_civita(o, 0, 3, 2)(0), "levi_civita(o,0,3,2)(0)");
894  test_for_zero(levi_civita(o, 0, 3, 2)(1) - 1, "levi_civita(o,0,3,2)(1)");
895  test_for_zero(levi_civita(o, 0, 3, 2)(2), "levi_civita(o,0,3,2)(2)");
896  test_for_zero(levi_civita(o, 0, 3, 2)(3), "levi_civita(o,0,3,2)(3)");
897  test_for_zero(levi_civita(o, 0, 3, 3)(0), "levi_civita(o,0,3,3)(0)");
898  test_for_zero(levi_civita(o, 0, 3, 3)(1), "levi_civita(o,0,3,3)(1)");
899  test_for_zero(levi_civita(o, 0, 3, 3)(2), "levi_civita(o,0,3,3)(2)");
900  test_for_zero(levi_civita(o, 0, 3, 3)(3), "levi_civita(o,0,3,3)(3)");
901 
902  test_for_zero(levi_civita(o, 1, 0, 0)(0), "levi_civita(o,1,0,0)(0)");
903  test_for_zero(levi_civita(o, 1, 0, 0)(1), "levi_civita(o,1,0,0)(1)");
904  test_for_zero(levi_civita(o, 1, 0, 0)(2), "levi_civita(o,1,0,0)(2)");
905  test_for_zero(levi_civita(o, 1, 0, 0)(3), "levi_civita(o,1,0,0)(3)");
906  test_for_zero(levi_civita(o, 1, 0, 1)(0), "levi_civita(o,1,0,1)(0)");
907  test_for_zero(levi_civita(o, 1, 0, 1)(1), "levi_civita(o,1,0,1)(1)");
908  test_for_zero(levi_civita(o, 1, 0, 1)(2), "levi_civita(o,1,0,1)(2)");
909  test_for_zero(levi_civita(o, 1, 0, 1)(3), "levi_civita(o,1,0,1)(3)");
910  test_for_zero(levi_civita(o, 1, 0, 2)(0), "levi_civita(o,1,0,2)(0)");
911  test_for_zero(levi_civita(o, 1, 0, 2)(1), "levi_civita(o,1,0,2)(1)");
912  test_for_zero(levi_civita(o, 1, 0, 2)(2), "levi_civita(o,1,0,2)(2)");
913  test_for_zero(levi_civita(o, 1, 0, 2)(3) - 1, "levi_civita(o,1,0,2)(3)");
914  test_for_zero(levi_civita(o, 1, 0, 3)(0), "levi_civita(o,1,0,3)(0)");
915  test_for_zero(levi_civita(o, 1, 0, 3)(1), "levi_civita(o,1,0,3)(1)");
916  test_for_zero(levi_civita(o, 1, 0, 3)(2) + 1, "levi_civita(o,1,0,3)(2)");
917  test_for_zero(levi_civita(o, 1, 0, 3)(3), "levi_civita(o,1,0,3)(3)");
918 
919  test_for_zero(levi_civita(o, 1, 1, 0)(0), "levi_civita(o,1,1,0)(0)");
920  test_for_zero(levi_civita(o, 1, 1, 0)(1), "levi_civita(o,1,1,0)(1)");
921  test_for_zero(levi_civita(o, 1, 1, 0)(2), "levi_civita(o,1,1,0)(2)");
922  test_for_zero(levi_civita(o, 1, 1, 0)(3), "levi_civita(o,1,1,0)(3)");
923  test_for_zero(levi_civita(o, 1, 1, 1)(0), "levi_civita(o,1,1,1)(0)");
924  test_for_zero(levi_civita(o, 1, 1, 1)(1), "levi_civita(o,1,1,1)(1)");
925  test_for_zero(levi_civita(o, 1, 1, 1)(2), "levi_civita(o,1,1,1)(2)");
926  test_for_zero(levi_civita(o, 1, 1, 1)(3), "levi_civita(o,1,1,1)(3)");
927  test_for_zero(levi_civita(o, 1, 1, 2)(0), "levi_civita(o,1,1,2)(0)");
928  test_for_zero(levi_civita(o, 1, 1, 2)(1), "levi_civita(o,1,1,2)(1)");
929  test_for_zero(levi_civita(o, 1, 1, 2)(2), "levi_civita(o,1,1,2)(2)");
930  test_for_zero(levi_civita(o, 1, 1, 2)(3), "levi_civita(o,1,1,2)(3)");
931  test_for_zero(levi_civita(o, 1, 1, 3)(0), "levi_civita(o,1,1,3)(0)");
932  test_for_zero(levi_civita(o, 1, 1, 3)(1), "levi_civita(o,1,1,3)(1)");
933  test_for_zero(levi_civita(o, 1, 1, 3)(2), "levi_civita(o,1,1,3)(2)");
934  test_for_zero(levi_civita(o, 1, 1, 3)(3), "levi_civita(o,1,1,3)(3)");
935 
936  test_for_zero(levi_civita(o, 1, 2, 0)(0), "levi_civita(o,1,2,0)(0)");
937  test_for_zero(levi_civita(o, 1, 2, 0)(1), "levi_civita(o,1,2,0)(1)");
938  test_for_zero(levi_civita(o, 1, 2, 0)(2), "levi_civita(o,1,2,0)(2)");
939  test_for_zero(levi_civita(o, 1, 2, 0)(3) + 1, "levi_civita(o,1,2,0)(3)");
940  test_for_zero(levi_civita(o, 1, 2, 1)(0), "levi_civita(o,1,2,1)(0)");
941  test_for_zero(levi_civita(o, 1, 2, 1)(1), "levi_civita(o,1,2,1)(1)");
942  test_for_zero(levi_civita(o, 1, 2, 1)(2), "levi_civita(o,1,2,1)(2)");
943  test_for_zero(levi_civita(o, 1, 2, 1)(3), "levi_civita(o,1,2,1)(3)");
944  test_for_zero(levi_civita(o, 1, 2, 2)(0), "levi_civita(o,1,2,2)(0)");
945  test_for_zero(levi_civita(o, 1, 2, 2)(1), "levi_civita(o,1,2,2)(1)");
946  test_for_zero(levi_civita(o, 1, 2, 2)(2), "levi_civita(o,1,2,2)(2)");
947  test_for_zero(levi_civita(o, 1, 2, 2)(3), "levi_civita(o,1,2,2)(3)");
948  test_for_zero(levi_civita(o, 1, 2, 3)(0) - 1, "levi_civita(o,1,2,3)(0)");
949  test_for_zero(levi_civita(o, 1, 2, 3)(1), "levi_civita(o,1,2,3)(1)");
950  test_for_zero(levi_civita(o, 1, 2, 3)(2), "levi_civita(o,1,2,3)(2)");
951  test_for_zero(levi_civita(o, 1, 2, 3)(3), "levi_civita(o,1,2,3)(3)");
952 
953  test_for_zero(levi_civita(o, 1, 3, 0)(0), "levi_civita(o,1,3,0)(0)");
954  test_for_zero(levi_civita(o, 1, 3, 0)(1), "levi_civita(o,1,3,0)(1)");
955  test_for_zero(levi_civita(o, 1, 3, 0)(2) - 1, "levi_civita(o,1,3,0)(2)");
956  test_for_zero(levi_civita(o, 1, 3, 0)(3), "levi_civita(o,1,3,0)(3)");
957  test_for_zero(levi_civita(o, 1, 3, 1)(0), "levi_civita(o,1,3,1)(0)");
958  test_for_zero(levi_civita(o, 1, 3, 1)(1), "levi_civita(o,1,3,1)(1)");
959  test_for_zero(levi_civita(o, 1, 3, 1)(2), "levi_civita(o,1,3,1)(2)");
960  test_for_zero(levi_civita(o, 1, 3, 1)(3), "levi_civita(o,1,3,1)(3)");
961  test_for_zero(levi_civita(o, 1, 3, 2)(0) + 1, "levi_civita(o,1,3,2)(0)");
962  test_for_zero(levi_civita(o, 1, 3, 2)(1), "levi_civita(o,1,3,2)(1)");
963  test_for_zero(levi_civita(o, 1, 3, 2)(2), "levi_civita(o,1,3,2)(2)");
964  test_for_zero(levi_civita(o, 1, 3, 2)(3), "levi_civita(o,1,3,2)(3)");
965  test_for_zero(levi_civita(o, 1, 3, 3)(0), "levi_civita(o,1,3,3)(0)");
966  test_for_zero(levi_civita(o, 1, 3, 3)(1), "levi_civita(o,1,3,3)(1)");
967  test_for_zero(levi_civita(o, 1, 3, 3)(2), "levi_civita(o,1,3,3)(2)");
968  test_for_zero(levi_civita(o, 1, 3, 3)(3), "levi_civita(o,1,3,3)(3)");
969 
970  test_for_zero(levi_civita(o, 2, 0, 0)(0), "levi_civita(o,2,0,0)(0)");
971  test_for_zero(levi_civita(o, 2, 0, 0)(1), "levi_civita(o,2,0,0)(1)");
972  test_for_zero(levi_civita(o, 2, 0, 0)(2), "levi_civita(o,2,0,0)(2)");
973  test_for_zero(levi_civita(o, 2, 0, 0)(3), "levi_civita(o,2,0,0)(3)");
974  test_for_zero(levi_civita(o, 2, 0, 1)(0), "levi_civita(o,2,0,1)(0)");
975  test_for_zero(levi_civita(o, 2, 0, 1)(1), "levi_civita(o,2,0,1)(1)");
976  test_for_zero(levi_civita(o, 2, 0, 1)(2), "levi_civita(o,2,0,1)(2)");
977  test_for_zero(levi_civita(o, 2, 0, 1)(3) + 1, "levi_civita(o,2,0,1)(3)");
978  test_for_zero(levi_civita(o, 2, 0, 2)(0), "levi_civita(o,2,0,2)(0)");
979  test_for_zero(levi_civita(o, 2, 0, 2)(1), "levi_civita(o,2,0,2)(1)");
980  test_for_zero(levi_civita(o, 2, 0, 2)(2), "levi_civita(o,2,0,2)(2)");
981  test_for_zero(levi_civita(o, 2, 0, 2)(3), "levi_civita(o,2,0,2)(3)");
982  test_for_zero(levi_civita(o, 2, 0, 3)(0), "levi_civita(o,2,0,3)(0)");
983  test_for_zero(levi_civita(o, 2, 0, 3)(1) - 1, "levi_civita(o,2,0,3)(1)");
984  test_for_zero(levi_civita(o, 2, 0, 3)(2), "levi_civita(o,2,0,3)(2)");
985  test_for_zero(levi_civita(o, 2, 0, 3)(3), "levi_civita(o,2,0,3)(3)");
986 
987  test_for_zero(levi_civita(o, 2, 1, 0)(0), "levi_civita(o,2,1,0)(0)");
988  test_for_zero(levi_civita(o, 2, 1, 0)(1), "levi_civita(o,2,1,0)(1)");
989  test_for_zero(levi_civita(o, 2, 1, 0)(2), "levi_civita(o,2,1,0)(2)");
990  test_for_zero(levi_civita(o, 2, 1, 0)(3) - 1, "levi_civita(o,2,1,0)(3)");
991  test_for_zero(levi_civita(o, 2, 1, 1)(0), "levi_civita(o,2,1,1)(0)");
992  test_for_zero(levi_civita(o, 2, 1, 1)(1), "levi_civita(o,2,1,1)(1)");
993  test_for_zero(levi_civita(o, 2, 1, 1)(2), "levi_civita(o,2,1,1)(2)");
994  test_for_zero(levi_civita(o, 2, 1, 1)(3), "levi_civita(o,2,1,1)(3)");
995  test_for_zero(levi_civita(o, 2, 1, 2)(0), "levi_civita(o,2,1,2)(0)");
996  test_for_zero(levi_civita(o, 2, 1, 2)(1), "levi_civita(o,2,1,2)(1)");
997  test_for_zero(levi_civita(o, 2, 1, 2)(2), "levi_civita(o,2,1,2)(2)");
998  test_for_zero(levi_civita(o, 2, 1, 2)(3), "levi_civita(o,2,1,2)(3)");
999  test_for_zero(levi_civita(o, 2, 1, 3)(0) + 1, "levi_civita(o,2,1,3)(0)");
1000  test_for_zero(levi_civita(o, 2, 1, 3)(1), "levi_civita(o,2,1,3)(1)");
1001  test_for_zero(levi_civita(o, 2, 1, 3)(2), "levi_civita(o,2,1,3)(2)");
1002  test_for_zero(levi_civita(o, 2, 1, 3)(3), "levi_civita(o,2,1,3)(3)");
1003 
1004  test_for_zero(levi_civita(o, 2, 2, 0)(0), "levi_civita(o,2,2,0)(0)");
1005  test_for_zero(levi_civita(o, 2, 2, 0)(1), "levi_civita(o,2,2,0)(1)");
1006  test_for_zero(levi_civita(o, 2, 2, 0)(2), "levi_civita(o,2,2,0)(2)");
1007  test_for_zero(levi_civita(o, 2, 2, 0)(3), "levi_civita(o,2,2,0)(3)");
1008  test_for_zero(levi_civita(o, 2, 2, 1)(0), "levi_civita(o,2,2,1)(0)");
1009  test_for_zero(levi_civita(o, 2, 2, 1)(1), "levi_civita(o,2,2,1)(1)");
1010  test_for_zero(levi_civita(o, 2, 2, 1)(2), "levi_civita(o,2,2,1)(2)");
1011  test_for_zero(levi_civita(o, 2, 2, 1)(3), "levi_civita(o,2,2,1)(3)");
1012  test_for_zero(levi_civita(o, 2, 2, 2)(0), "levi_civita(o,2,2,2)(0)");
1013  test_for_zero(levi_civita(o, 2, 2, 2)(1), "levi_civita(o,2,2,2)(1)");
1014  test_for_zero(levi_civita(o, 2, 2, 2)(2), "levi_civita(o,2,2,2)(2)");
1015  test_for_zero(levi_civita(o, 2, 2, 2)(3), "levi_civita(o,2,2,2)(3)");
1016  test_for_zero(levi_civita(o, 2, 2, 3)(0), "levi_civita(o,2,2,3)(0)");
1017  test_for_zero(levi_civita(o, 2, 2, 3)(1), "levi_civita(o,2,2,3)(1)");
1018  test_for_zero(levi_civita(o, 2, 2, 3)(2), "levi_civita(o,2,2,3)(2)");
1019  test_for_zero(levi_civita(o, 2, 2, 3)(3), "levi_civita(o,2,2,3)(3)");
1020 
1021  test_for_zero(levi_civita(o, 2, 3, 0)(0), "levi_civita(o,2,3,0)(0)");
1022  test_for_zero(levi_civita(o, 2, 3, 0)(1) + 1, "levi_civita(o,2,3,0)(1)");
1023  test_for_zero(levi_civita(o, 2, 3, 0)(2), "levi_civita(o,2,3,0)(2)");
1024  test_for_zero(levi_civita(o, 2, 3, 0)(3), "levi_civita(o,2,3,0)(3)");
1025  test_for_zero(levi_civita(o, 2, 3, 1)(0) - 1, "levi_civita(o,2,3,1)(0)");
1026  test_for_zero(levi_civita(o, 2, 3, 1)(1), "levi_civita(o,2,3,1)(1)");
1027  test_for_zero(levi_civita(o, 2, 3, 1)(2), "levi_civita(o,2,3,1)(2)");
1028  test_for_zero(levi_civita(o, 2, 3, 1)(3), "levi_civita(o,2,3,1)(3)");
1029  test_for_zero(levi_civita(o, 2, 3, 2)(0), "levi_civita(o,2,3,2)(0)");
1030  test_for_zero(levi_civita(o, 2, 3, 2)(1), "levi_civita(o,2,3,2)(1)");
1031  test_for_zero(levi_civita(o, 2, 3, 2)(2), "levi_civita(o,2,3,2)(2)");
1032  test_for_zero(levi_civita(o, 2, 3, 2)(3), "levi_civita(o,2,3,2)(3)");
1033  test_for_zero(levi_civita(o, 2, 3, 3)(0), "levi_civita(o,2,3,3)(0)");
1034  test_for_zero(levi_civita(o, 2, 3, 3)(1), "levi_civita(o,2,3,3)(1)");
1035  test_for_zero(levi_civita(o, 2, 3, 3)(2), "levi_civita(o,2,3,3)(2)");
1036  test_for_zero(levi_civita(o, 2, 3, 3)(3), "levi_civita(o,2,3,3)(3)");
1037 
1038  test_for_zero(levi_civita(o, 3, 0, 0)(0), "levi_civita(o,3,0,0)(0)");
1039  test_for_zero(levi_civita(o, 3, 0, 0)(1), "levi_civita(o,3,0,0)(1)");
1040  test_for_zero(levi_civita(o, 3, 0, 0)(2), "levi_civita(o,3,0,0)(2)");
1041  test_for_zero(levi_civita(o, 3, 0, 0)(3), "levi_civita(o,3,0,0)(3)");
1042  test_for_zero(levi_civita(o, 3, 0, 1)(0), "levi_civita(o,3,0,1)(0)");
1043  test_for_zero(levi_civita(o, 3, 0, 1)(1), "levi_civita(o,3,0,1)(1)");
1044  test_for_zero(levi_civita(o, 3, 0, 1)(2) - 1, "levi_civita(o,3,0,1)(2)");
1045  test_for_zero(levi_civita(o, 3, 0, 1)(3), "levi_civita(o,3,0,1)(3)");
1046  test_for_zero(levi_civita(o, 3, 0, 2)(0), "levi_civita(o,3,0,2)(0)");
1047  test_for_zero(levi_civita(o, 3, 0, 2)(1) + 1, "levi_civita(o,3,0,2)(1)");
1048  test_for_zero(levi_civita(o, 3, 0, 2)(2), "levi_civita(o,3,0,2)(2)");
1049  test_for_zero(levi_civita(o, 3, 0, 2)(3), "levi_civita(o,3,0,2)(3)");
1050  test_for_zero(levi_civita(o, 3, 0, 3)(0), "levi_civita(o,3,0,3)(0)");
1051  test_for_zero(levi_civita(o, 3, 0, 3)(1), "levi_civita(o,3,0,3)(1)");
1052  test_for_zero(levi_civita(o, 3, 0, 3)(2), "levi_civita(o,3,0,3)(2)");
1053  test_for_zero(levi_civita(o, 3, 0, 3)(3), "levi_civita(o,3,0,3)(3)");
1054 
1055  test_for_zero(levi_civita(o, 3, 1, 0)(0), "levi_civita(o,3,1,0)(0)");
1056  test_for_zero(levi_civita(o, 3, 1, 0)(1), "levi_civita(o,3,1,0)(1)");
1057  test_for_zero(levi_civita(o, 3, 1, 0)(2) + 1, "levi_civita(o,3,1,0)(2)");
1058  test_for_zero(levi_civita(o, 3, 1, 0)(3), "levi_civita(o,3,1,0)(3)");
1059  test_for_zero(levi_civita(o, 3, 1, 1)(0), "levi_civita(o,3,1,1)(0)");
1060  test_for_zero(levi_civita(o, 3, 1, 1)(1), "levi_civita(o,3,1,1)(1)");
1061  test_for_zero(levi_civita(o, 3, 1, 1)(2), "levi_civita(o,3,1,1)(2)");
1062  test_for_zero(levi_civita(o, 3, 1, 1)(3), "levi_civita(o,3,1,1)(3)");
1063  test_for_zero(levi_civita(o, 3, 1, 2)(0) - 1, "levi_civita(o,3,1,2)(0)");
1064  test_for_zero(levi_civita(o, 3, 1, 2)(1), "levi_civita(o,3,1,2)(1)");
1065  test_for_zero(levi_civita(o, 3, 1, 2)(2), "levi_civita(o,3,1,2)(2)");
1066  test_for_zero(levi_civita(o, 3, 1, 2)(3), "levi_civita(o,3,1,2)(3)");
1067  test_for_zero(levi_civita(o, 3, 1, 3)(0), "levi_civita(o,3,1,3)(0)");
1068  test_for_zero(levi_civita(o, 3, 1, 3)(1), "levi_civita(o,3,1,3)(1)");
1069  test_for_zero(levi_civita(o, 3, 1, 3)(2), "levi_civita(o,3,1,3)(2)");
1070  test_for_zero(levi_civita(o, 3, 1, 3)(3), "levi_civita(o,3,1,3)(3)");
1071 
1072  test_for_zero(levi_civita(o, 3, 2, 0)(0), "levi_civita(o,3,2,0)(0)");
1073  test_for_zero(levi_civita(o, 3, 2, 0)(1) - 1, "levi_civita(o,3,2,0)(1)");
1074  test_for_zero(levi_civita(o, 3, 2, 0)(2), "levi_civita(o,3,2,0)(2)");
1075  test_for_zero(levi_civita(o, 3, 2, 0)(3), "levi_civita(o,3,2,0)(3)");
1076  test_for_zero(levi_civita(o, 3, 2, 1)(0) + 1, "levi_civita(o,3,2,1)(0)");
1077  test_for_zero(levi_civita(o, 3, 2, 1)(1), "levi_civita(o,3,2,1)(1)");
1078  test_for_zero(levi_civita(o, 3, 2, 1)(2), "levi_civita(o,3,2,1)(2)");
1079  test_for_zero(levi_civita(o, 3, 2, 1)(3), "levi_civita(o,3,2,1)(3)");
1080  test_for_zero(levi_civita(o, 3, 2, 2)(0), "levi_civita(o,3,2,2)(0)");
1081  test_for_zero(levi_civita(o, 3, 2, 2)(1), "levi_civita(o,3,2,2)(1)");
1082  test_for_zero(levi_civita(o, 3, 2, 2)(2), "levi_civita(o,3,2,2)(2)");
1083  test_for_zero(levi_civita(o, 3, 2, 2)(3), "levi_civita(o,3,2,2)(3)");
1084  test_for_zero(levi_civita(o, 3, 2, 3)(0), "levi_civita(o,3,2,3)(0)");
1085  test_for_zero(levi_civita(o, 3, 2, 3)(1), "levi_civita(o,3,2,3)(1)");
1086  test_for_zero(levi_civita(o, 3, 2, 3)(2), "levi_civita(o,3,2,3)(2)");
1087  test_for_zero(levi_civita(o, 3, 2, 3)(3), "levi_civita(o,3,2,3)(3)");
1088 
1089  test_for_zero(levi_civita(o, 3, 3, 0)(0), "levi_civita(o,3,3,0)(0)");
1090  test_for_zero(levi_civita(o, 3, 3, 0)(1), "levi_civita(o,3,3,0)(1)");
1091  test_for_zero(levi_civita(o, 3, 3, 0)(2), "levi_civita(o,3,3,0)(2)");
1092  test_for_zero(levi_civita(o, 3, 3, 0)(3), "levi_civita(o,3,3,0)(3)");
1093  test_for_zero(levi_civita(o, 3, 3, 1)(0), "levi_civita(o,3,3,1)(0)");
1094  test_for_zero(levi_civita(o, 3, 3, 1)(1), "levi_civita(o,3,3,1)(1)");
1095  test_for_zero(levi_civita(o, 3, 3, 1)(2), "levi_civita(o,3,3,1)(2)");
1096  test_for_zero(levi_civita(o, 3, 3, 1)(3), "levi_civita(o,3,3,1)(3)");
1097  test_for_zero(levi_civita(o, 3, 3, 2)(0), "levi_civita(o,3,3,2)(0)");
1098  test_for_zero(levi_civita(o, 3, 3, 2)(1), "levi_civita(o,3,3,2)(1)");
1099  test_for_zero(levi_civita(o, 3, 3, 2)(2), "levi_civita(o,3,3,2)(2)");
1100  test_for_zero(levi_civita(o, 3, 3, 2)(3), "levi_civita(o,3,3,2)(3)");
1101  test_for_zero(levi_civita(o, 3, 3, 3)(0), "levi_civita(o,3,3,3)(0)");
1102  test_for_zero(levi_civita(o, 3, 3, 3)(1), "levi_civita(o,3,3,3)(1)");
1103  test_for_zero(levi_civita(o, 3, 3, 3)(2), "levi_civita(o,3,3,3)(2)");
1104  test_for_zero(levi_civita(o, 3, 3, 3)(3), "levi_civita(o,3,3,3)(3)");
1105 }
test_Levi_Civita_02
void test_Levi_Civita_02(void)
Definition: test_Levi_Civita_02.cpp:7
FTensor::levi_civita
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
Definition: Levi_Civita.hpp:617
test_Levi_Civita_03
void test_Levi_Civita_03(void)
Definition: test_Levi_Civita_03.cpp:7
FTensor::Number< 0 >
test_for_zero
void test_for_zero(const T &t, const std::string &s)
Definition: test_for_zero.hpp:7
test_Levi_Civita_04
void test_Levi_Civita_04(void)
Definition: test_Levi_Civita_04.cpp:7
test_Levi_Civita_01
void test_Levi_Civita_01(void)
Definition: test_Levi_Civita_01.cpp:7
i
FTensor::Index< 'i', SPACE_DIM > i
Definition: hcurl_divergence_operator_2d.cpp:27
FTensor::Index< 'i', 2 >
convert.n
n
Definition: convert.py:82
j
FTensor::Index< 'j', 3 > j
Definition: matrix_function.cpp:19
m
FTensor::Index< 'm', 3 > m
Definition: shallow_wave.cpp:80
k
FTensor::Index< 'k', 3 > k
Definition: matrix_function.cpp:20
l
FTensor::Index< 'l', 3 > l
Definition: matrix_function.cpp:21
Generated by Doxygen 1.8.17 and hosted at University of Glasgow